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PROGRAM DESCRIPTION 











SEQ 0063 
bd i. ABSTRACT 
@ THIS PROGRAM CONTAINS A SERIES OF BASIC LOGIC TESTS 
THAT CHECK THE TA11 FOR PROPER OPERATION, 
& 2e REQUIREMENTS 
2.1 EQUIPMENT 
bad PDPe11 COMPUTER WITH OR WITHOUT HARDWARE SWITCH REGISTER 
WITH CONSOLE TELETYPE, AND A TA11 CASSETTE 
e 202 STORAGE 
@ THIS PROGRAM REQUIRES APPROX, 4K STORAGE, 
2.3 PRELIMINARY PROGRAMS 
e MAINDEC@11¢DZTAA 
MAINDEC #11 °¢DZTAB 
e 3. LOADING PROCEDURE 
C)) USE STANDARD PROCEDURE FOR LOADING .ABS TAPES 
OR A CASSETTE TAPE, 
e@ Ge STARTING PROCEDURE 
4,1 CONTROL SWITCH SETTINGS 
e SEE 5.1, 
by) 4,2 STARTING ADDRESSES 
200 NORMAL STARTING ADDRESS 
@ 204 SELECT DRIVE(S) BEFORE STARTING TEST 
2108 SELECT DRIVE(S) AND ADDRESSES BEFORE STARTING TEST 
214 SETUP FOR MANUAL LOOPING 
@ 220 WRITE FILE GAP FROM BOT TO EOT 
224 WRITE CONTINOUS BLOCKS OF DATA 
230 READ CONTINOUS BLOCKS OF DATA 
® 234 WRITE FILE GAP AND A BLOCK OF DATA 
2408 READ BLOCK OF DATA AND INTO A FILE GAP 
244 SPACE FWD FILE GAP FROM BOT TO EOT 
e@ 250 BACK SPACE FILE GAPS 
500 LOAD SWITCH REGISTER INTO THE TACS 
600 WRITE SWITCH REGISTER ON TAPE FROM BOT TO EOT 
ry 700 READ FROM BOT TO EOT 
@ 
& 
& 
Cl 


4.3.1.1 


PROGRAM 6 OPERATOR ACTION 


1, LOAD PROGRAM INTO MEMORY (SEE SECTION 3,) 

2. LOAD A WRITE ENABLED CASSETTE IN BOTH DRIVES 

3. REWIND BOTH DRIVES 

4, LOAD ADDRESS 200, 

S. SET SWITCHES (SEE SECTION 5,1) 

6. PRESS START, 

7. THE PROGRAM WILL TYPE INSTRUCTIONS OW THE TTY FOR 
THE OPERATOR TO FOLLOW, AFTER THE OPERATOR HAS 
PERFORMED THE REQUIRED OPERATION HE WILL PRESS 
*CARRIAGE RETURN" AND THE PROGRAM WILL CONTINUE, 


eee NOTE: IF USING THE SOFTWARE SWITCH REGISTER THE 
PROGRAM WILL TYPE “SWREXXXXXX NEWs® AFTER TYPING 
THE NAME OF THE PROGRAM, 

DRIVE SELECTION 


STARTING THE PROGRAM AT 200 WILL RESULT IN AUTOMATIC 

SELECTION OF ORIVES “A* AWD °B" TO BE TESTED, 

NOTE? IF LOAD MEDIUM IS CASSETTE WITH STANDARD VECTOR 
PROGRAM WILL RESPOND AS IF STARTED AT 216. 


STARTING THE PROGRAM AT 204, 210, OR 214 ALLOWS THE OPERATOR 
TO SELECT THE DRIVE(S) TO BE TESTED, 


THE PROGRAM WILL TYPE *DRIVE(S)?°, 


EITHER OR BOTH DRIVES CAN BE SELECTED BY TYPING °A* AND/OR 
"B® FOLLOWED BY A CARRIAGE RETURN, 


DRIVE SELECTION EXAMPLES 


DRIVE(S)? A,B 
DRIVE(S)? AB 
ORIVE(S)? 8,A 
DRIVE(S)? B 





DI 


4.3.2.1 


ADDRESS SELECTION 


STARTING THE PROGRAM AT 210 OR 214 ALLOWS THE OPERATOR 
TO CHANGE THE “CONTROL AND STATUS® AND “DATA BUFFER® 
REGISTER ADDRESSES, THE VECTOR ADDRESS AND THE 
PRIORITY LEVEL, 


THE PROGRAM WILL ASK FOR THE DRIVES TO BE TESTED AS PER 
4.3.1, AFTER THE DRIVES HAVE BEEN SELECTED IT WILL ASK 
FOR: 


i. BUS ADDRESS OF THE CONTROL AND STATUS REGISTER (TACS) 

2. VECTOR ADDRESS 

3. PRIORITY LEVEL 
AND THE OPERATOR MUST RESPOND WITH THE DESIRED. PARAMETER 
OR A CARRIAGE RETURN (WHICH IMPLIES LEAVE AS 18), 
WHEN ALL PARAMETERS HAVE BEEW DEFINED THE PROGRAM 
WILL TYPE THEM BACK OUT AND ASK IF THEY APE OK AT 
WHICH TIME THE OPERATOR RESPONSES WITH A “¥* OR A 
"CARRIAGE RETURN" FOR “YES* ANYTHING ELSE IS A "NO", 


ADDRESS SELECTION EXAMPLES 


DRIVES(S) A 

TACS? 177500 

VECTOR? 260 

PRIORITY? 6 

TACS817750@ TADB#177502 VECTORS000269 PRIORITY=000300 
OK? 


DRIVES(S) AsB 

TACS? 470 . 
VECTOR? 

PRIORITY? 

TACS#8177470 TADB2177472 VECTOR#90026@ PRIORITY=000300 
OK? 


El 


OPERATING PROCEDURE 
OPERATIONAL SWITCH SETTINGS 


IF THE DIAGNOSTIC IS RUN ON A CPU WITHOUT A SWITCH 

REGISTER THEN A SOFTWARE SWITCH REGISTER IS USED WHICH ALLOWS 
THE USER THE SAME SWITCH OPTIONS AS THE HARDWARE SWITCH REGISTER, 
IF THE HARDWARE SWITCH REGISTER DOES NOT EXIST OR IF OWE DOES 
AND IT CONTAINS ALL ONES (177777) THEN THE SOFTWARE SWITCH 
REGISTER (LOC, 176) IS USED, 


CONTROL? 


THIS PROGRAM ALSO SUPPORTS THE DYNAMIC LOADING OF THE SOFTWARE SWITCH 
REGISTER (LOC, 176) FROM THE TTY, THIS CAN BE ACCOMPLISHED BY 
DOING THE FOLLOWING: 


1) TYPE CONTROL G <°G>; THIS WILL ALLOW THE TTY TO ENTER DATA INTO 
LOC, 176 AT SELECTED POINTS WITHIN THE PROGRAM, 


2) THE MACHINE WILL THEN TYPES SWREXXXXXXNEWS (XXXXXA IS THE OCTAL CONTENTS 
OF THE SOFTWARE SWITCH REGISTER.) 


3) AFTER THE °°NEWs°* HAS BEEN TYPED THEN THE OPERATOR CAN DO OWE 
OF THE FOLLOWING AT THE TTY: 


A) TYPE A NUMBER TO BE LOADED INTO LOC,-176 FOLLOWED BY A <CR>, 
CONLY NUMBERS BETWEEN @-7 WILL BE ACCEPTED AND ONLY 6 NUMBERS 
WILL BE ALLOWED) 

IF A <CR> IS THE FIRST KEY DEPRESSED THE SOFTWARE SWITCH 
REGISTER CONTENTS WILL NOT BE CHANGED, 


8) IF A CONTROL U <°U> IS DEPRESSED THEN THE PROGRAM WILL SEND YOU 
BACK TO STEP 2. 


WITH SW<15308>s@ THE PROGRAM WILL PRINT OUT ON 
ERRORS AND CONTINUE IN TEST, BELL WILL RING 
AT COMPLETION OF A PASS, 

THE SWITCH SETTINGS APE: 


SW<15>21,.,HALT ON ERROR 
SW<14>31,,,LO00P ON TEST 
SW<13>81,., INHIBIT ERROR TYPEOUTS 
SW<11>81,.,INHIBIT ITERATIONS 
SW<10>81,..RING BELL ON ERROR 
SW<10>30,,,RING BELL ON PASS COMPLETE 
SW<09>381,,.,LO00P ON ERROR 
SW<08>31,.,LOO0P ON TEST AS PER SW<07200> 
SW<O7>81,.,L0CK ON CURRENT DRIVE (ONLY VALID 

FOR STARTING ADDRESSES 220 THRU 254), 


F| 
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SUBROUTINE ABSTRACTS 

SCOPE 

THIS SUBROUTINE CALL (VIA AN IOT INSTRUCTION) IS PLACED BETWEEN 
EACH TEST IN THE INSTRUCTION SECTION, IT RECORDS THE STARTING 
ADDRESS OF EACH TEST IN LOCATION *°S$LPADR® AND "“SLPERR® AS IT IS 
BEING ENTERED, 


THIS ROUTINE SUPPORTS THE S/W SWITCH REG FUNCTIONS 
TRAPCATCHER 


A *,¢2" © *°HALT® SEQUENCE 1S REPEATED FROM LOC, @ TO LOC, 776 
TO CATCH ANY UNEXPECTED TRAPS, THUS,» ANY UNEXPECTED TRAPS WILL 
HALT AT THE DEVICE TRAP VECTOR ¢2, 

ERROR 

THIS SUBROUTINE CALL (VIA A EMT INSTRUCTION) IS USED TO REPORT 
ALL ERRORS, (REFER TO 6,) 

eee THIS ROUTINE SUPPORTS THE S/W SWITCH REG FUNCTIONS 

eee IF THE PROCESSOR HALTS (BIT 1581), OPERATOP 

CAN RESET S/W SWITCH REGISTER BY HITTING A 

"CONTROL G" <°G> BEFORE HITTING CONTINUE, 

TRAP 

A NUMBER OF SUBROUTINES ARE CALLED BY THE TRAP INSTRUCTION, 
FOLLOWING IS THE CALLS USED AND THE LABEL OF THE STARTING 
ADDRESS OF THE SUBROUTINES, 

TYPE ($TYPE) 

ROUTINE TO TYPE AN ASCIZ STRING ON THE TTY 


THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS 
AFTER A LINE FEED, 


RDCHR ($RDCHR) 

READ A SINGLE ASCI] CHARACTER FROM THE TTY 
RDLIN ($RDLIN) 

READ AN ASCII STRING FROM THE TTY 

WAITREADY (WAIT.ON, READY) 

WAIT ON THE “TA11 READY" BIT TO SET 

WAITXFER (WAIT,FOR,XFER,REQ) 

wAIT ON THE "TA11 TRANSFER REQUEST® BIT TO SET 


SEQ 6007 


5.2.5 
5026561 


Se2e5e2 


522.563 
52504 


5020505 





THE FOLLOWING SUBROUTINES ARE CALLED BY A JSR 
sTYPEC 

ROUTINE TO TYPE A SINGLE ASCII CHARACTER 
TYPERR 

THIS ROUTINE WILL TYPE THE ERROR MESSAGES 
SELDRV 


THIS ROUTINE IS USED TO ASK THE OPERATOR WHAT DRIVE(S) 
ARE TO BE TESTED 


ASKADR 


THIS ROUTINE WILL ASK THE OPERATOR FOR THE ADDRESSES OF 


THE *TACS","*TADB" AND VECTOR AND THE PRIORITY TO USE, 
ASKQUES 


THIS ROUTINE WILL TYPE DIRECTIONS ON THE TTY AND WAITS 
FOR A RESPONSE OF A "¥","N" OR "CARRIAGE RETURN, 


¢ 


522.663 


5.2.6.4 





THE FOLLOW ROUTINES ARE USED TO MAKE ADJUSTMENTS TO 
THE TU6®, BEFORE USING ANY OF THEM LOAD AND START 214, 


wFGSUB 


WRITE FILE GAPS FROM “B80T* TO “EOT* 

START AT 220 

THIS ROUTINE CAN BE USED TO ADJUST THE “WRITE GAP MONO” AND 
THE “WRITE DELAY MONO", 


WRTSUB 


WRITE CONTINUOUS BLOCKS OF DATA 

START AT 224 

THE PROGRAM WILL HALT THREE(3) TIMES 

AFTER EACH HALT SET THE SWR AND PRESS CONTINUE 

HALT 1 ee° SWRC720> = NUMBER OF BYTES PER BLOCK 

HALT 2 ee=SWR<730> & PATTERN DESIRED 

HALT 3 eee SWRC15:0> = OPERATIONAL SWITCH SETTINGS 
THIS ROUTINE CAN BE USED TO ADJUST THE “GAP TIME MONO* 


oe IF USING SOFTWARE SWITCH REGISTER, AFTER 
EACH HALT OPERATOR WILL BE PROMPTED 
FOR THE VALUE WITH "“SWREXXXXXX NEWs* 
RDSUB 


READ CONTINUOUS BLOCKS OF DATA 

START AT 230 

THIS ROUTINE CAN BE USED TO ADJUST THE “SIGNAL MONO® 
AND THE "THRESHOLD POT*® 


WGPBLK 


WRITE A FILE GAP AND A BLOCK OF DATA FROM BOT TO ECT 
START AT 234 
THE PROGRAM WILL HALT THREE (3) TIMES 
AFTER EACH HALT SET THE SWR AND PRESS CONTINUE 
HALT 1 eee SWR<C730> BS NUMBER OF BYTES PER BLOCK 
HALT 2 eee SWRC730> = PATTERN DESIRED 
HALT 3 ee SWRC1530> & OPERATIONAL SWITCH SETTINGS 
THIS ROUTINE CAN BE USED TO ADJUST THE “wRITE GAP MONO*® 
AND THE “GAP TIME MONO*, 
## IF USING SOFTWARE SWITCH REGISTER, AFTER 
EACH HALT OPERATOR WILL BE PROMPTED 
FOR THE VALUE WITH "“SWReXXXXXX NEwWs" 


RGBLK 


READ A BLOCK OF DATA AND A FILE GAP 
START AT 240 


THIS ROUTINE IS USED AFTER °WRITE A BLOCK AND A FILE GAP® ROUTINE 
IT CAN BE USED TO ADJUST THE “SIGNAL MON*, THE THRESHOLD poT*® 


AND THE "TAPE BLANK MONO®, . 





<i. 


5020607 


4 


5.2.7 


5 o2e7el 


5.2.7.2 


5020763 


5.22744 


6. 


SFFGsB 

SPACE FORWARO FILE GAP FROM “BOT*® TO "EOT® 

START AT 244 

THIS ROUTINE CAN BE USED AFTER “WRITE FILE GAP* FOR LOW SPEED 
SPACE FOWARD (TAPE BLANK “OWO CAN BE ADJUSTED), OR AFTER READ OR 
WRITE A FILE GAP AND A BLOCK OF DATA FOR HIGH SPEED SPACE FORWARD 
(SIGNAL MONO CAN BE CHECKED), 

BSFGSB 

BACK SPACE FILE GAP 

START AT 250 

THIS ROUTINE CAN BE USED TO ADJUST OR CHECK THE °SIGNAL MONO®, 


THE FOLLOWING SUBROUTINES ARE USED BY THE ADJUSTMENT 
ROUTINES 


SETBUF 

SETUP BLOCK SIZE AND PATTERN 

WRTBLK 

WRITES A BLOCK OF DATA 

RDBLK 

READS A BLOCK OF DATA 

NXTDRV 

CHANGE DRIVE 

ERRORS 

THERE ARE A NUMBER OF ERRORS THAT CAN OCCUR IN THIS 
PROGRAM, WHEN AN ERROR IS ENCOUNTERED THE CALL TO 
THE ERROR ROUTINE IS MADE AND IF Sw<i3> 1S NOT 

SET AN ERROR MESSAGE PERTAINING TO THE ERROR WILL BE 
TYPED, EACH ERROR TYPE OUT WILL CONTAIN THE FOLLOWING; 
1, AN ERROR MESSAGE 

2. A DATA HEADER 

3. <A DATA STRING 


REFER TO THE LISTING UNDER SERRTB FOR THE DIFFERENT 
ERRORS THAT CAN OCCUR, 


T) 


SEO O11 
7. RESTRICTIONS 


BEFORE STARTING THE PROGRAM THE OPERATOR MUST INSURE THAT A 
CASSETTE IS LOADED IN THE DRIVE(S) TO BE TESTED AWD IS WRITE 


ENABLED, 
8. MISCELLANEOUS 
8.1 EXECUTION TIME 


IS OPERATOR DEPENDENT BUT SHOULD TAKE NO MORE THAN 2 MINUTES, 
8.2 STACK POINTER 
STACK IS INITIALLY SET TO 1100, 
8.3 PASS COUNT 
A PROGRAM PASS THRU COUNT IS KEPT IN “SPASS", 
8.4 ITERATIONS 
THE FIRST PASS OF THE PROGRAM WILL AUTOMATICALLY INHIBIT 
ITERATIONS, ALL SUBSEQUENT PASSES WILL PERFORM FULL, 
(2000 DECIMAL UNLESS OTHERWISE SPECIFIED WITHIN A TEST), 
ITERATIONS, 
8.5 SPECIAL REGISTERS 


R3, R4 AND RS ARE RESERVED THROUGH OUT THE PROGRAM 
FOR "DRIVE", *TACS®* AND *TADB* 


9. PROGRAM DESCRIPTION 


THIS PROGRAM IS #& SEQUENCE OF SMALL TESTS THAT CHECK 
THE TAii1 FOR PROPER OPERATION, 


THE TESTS CAN BE GROUPED INTO THE FOLLOWING GENERAL GROUPS, 
1, TEST “OFFLINE” WITH TU6@ POWER OFF 


2. TEST “OFFLINE* WITH CASSETTE REMOVED 
3. TEST "WRITE LOCK® CIRCUITRY 





7) 
TAi11 MANUAL INTERVENTION TEST MAINDEC-1 1 eDZTACoC MACY11 27(732) ifeJUN@-76 13351 
& DZTACC ,WEW TABLE OF CONTENTS 
12 GENERAL INFORMATION 
8 60 OPERATIONAL SWITCH SETTINGS 
73 BASIC DEFINITIONS 
183 TAI1 DEFINITIONS 
fe) 224 STARTING ADDRESSES 
225 TRAP CATCHER 
234 STARTING ADDRESS(ES) 
@ 246 TOGGLE IN ROUTINES 
293 LOAD SWITCH REGISTER INTO TACS 
301 WRITE SWITCH REGISTER ON TAPE FROM BOT TO EO? 
@ 327 READ FROM BOT TO EOT 
344 COMMON TAGS 
405 ERROR POINTER TABLE 
Py 466 START OF TEST 
494 INITIALIZE THE COMMON TAGS 
$29 TYPE PROGRAM NAME 
& $36 GET VALUE FOR SOFTWARE SWITCH REGISTER 
702 Ti ROUTINE TO DETERMINE TIME OF WAIT LOOPS 
720 COOSESSSZEMANUAL INTERVENTIONGOGesaoens 
@ 721 T2 SETUP FOR MANUAL INTERVENTION ® 
737 T3 SETUP FOR POWER DOWN TU6@ TEST 
753 T¢ TEST “OFFLINE WHEN fU6@ IS POWERED DOWN 
& 798 Ts POWER UP THE TU60 
813 Té TEST “OFFLINE® WHEN DRIVE IS EMPTY 
829 T7 PUT DRIVE *ONLINE* 
e 844 Tie PUT DATA ON TAPE FOR WRITE LOCK TEST 
896 Tii TEST “WRITE LOCK® WHEN AT CLEAR LEADER 
10060 T12 TEST “WRITE LOCK® WITH "CRC ERROR* 
Se 1101 Ti3 TEST “WRITE LOCK® WITHOUT ANY ERRORS 
1194 T1i4 TEST "WRITE LOCK® WITH FILE GAps{ 
1295 Tis TRY WRITING ON TAPE WHEN “WRITE LOCKED® 
o 1341 Tio TRY "“WFG" WHEN WRITE LOCKED 
1372 Ti7 TEST °WFG" ON CLEAR LEADER AND WRITE LOCKED 
1393 T208 TEST “¥+.TE* WITH WRITE LOCK ON AND AT CLEAR LEADER 
& 1412 T21 TEST “weiTE ENABLE* 
1430 T22 END OF TEST CODE 
1440 END OF PASS ROUTINE 
& 1476 SCOPE HANDLER ROUTINE 
1540 ERROR HANDLER ROUTINE 
1592 ERROR TYPEOUT ROUTINE 
@ 1628 ROUTINE TO WAIT ON THE READY BIT TO SET 
1657 ROUTINE TO WAIT ON TRANSFER REQUEST 
1686 ROUTINE TO ASK THE OPERATOR WHAT DRIVE(S) TO TEST 
oO 1721 ROUTINE TO INPUT CSR,DBR, AND VECTOR ADDRESS AND PRIORITY 
1786 TYPE DIRECTIONS TO OPERATOR AND WAIT FOR RESPONSE 
1826 eseeeeceee MANUAL ADJUSTMENT ROUTINES ##eseeeece 
& 1836 WRITE FILE GAPS FROM "BOT" TO *EOT® 
1861 WRITE CONTINUOUS BLOCKS OF DATA 
1893 READ CONTINUOUS BLOCKS OF DATA 
& 1916 WRITE A FILE GAP AND A BLOCK OF DATA FROM BOT TO EOT 
1953 READ A BLOCK OF DATA AND A FILE GAP 
1981 SPACE FORWARD FILE GAP FROM "BOT® TO “EOT* 
B 2008 BACK SPACE FILE GAP 
2025 SETUP BLOCK SIZE AND PATTERN FOR SUBROUTINES 
2059 WRITE ROUTINE FOR THE MANUAL OPERATIONS 
e 2077 READ ROUTINE FOR THE MANUAL OPERATIONS 
8 


SEQ 0812 


L) 





TAI1 MANUAL INTERVENTION TEST MAINDEC*11-D2TAC*C MACY11 27(732) ifeJUN@76 13:51 SEQ 0013 


DOZTACC NEW TABLE OF CONTENTS 
2102 ROUTINE TO CHANGE DRIVES 
2118 ROUTINE TO EXAMINE DRIVE(S) FOR AVAILABLITY 
2148 TYPE ROUTINE 
2218 TTY INPUT ROUTINE 
2357 READ AN OCTAL NUMBER FROM THE TTY 
2395 BINARY TO OCTAL (ASCII) AND TYPE 
2472 TRAP DECODER 
2495 TRAP TABLE 
2516 POWER DOWN AND UP ROUTINES 


: mi 
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) 
i eTITLE TAIL MANUAL INTERVENTION TEST MAINDEC #1 1°DZTACeC 
& 2 s®COPYRIGHT (C) 1973,1976 
3 s*DIGITAL EQUIPMENT CORP, 
4 S@MAYNARD, MASS, 01754 
® s re 
6 s*®PROGRAM BY JIM LACEY 
7 3 
@ 8 s*THIS PROGRAM WAS ASSEMBLED USING THE POP-11 MAINDEC SYSMAC 
9 s@®PACKAGE (MAINDEC#11°¢DZQAC@C1),MAR 24, 1976. 
10 3* 
& ii FF SSSSHSSSHSSHSHSSSSSHHSSSSHSHSSHSSHSSHHSHSHSHHSHSHHCSHESHSSSHCSFESSES 
12 FF SSOSSHSSHSHSSSSSHSHESSESSHOSSHHSSHSHSSEHSSHSHSHHHSSHKEHPSHHSHESHCOEHOESHSS 
13 FPF SSSSSSSSSSSSHSESSHSHHSSSSHCHHSSEKHSHHSSHSHSCSHSHSSSHHESCSSESEHEES 
G 14 REM! ' 
i5 
16 GENERAL INFORMATION ABOUT THE TAL1/TU6@ CASSETTE 
17 
° 18 ADDRESS MNEMONIC DESCRIPTION 
19 Seeeceeecen ~seceseoeseoeesecos 
20 
@ - & 
22 . 777500 TACS CONTROL AND STATUS REGISTER 
eo 23 777502 TADB DATA BUFFER REGISTER 
24 20@ TAVEC INTERRUPT VECTOR 
25 
e 26 
27 TACS REGISTER DESCRIPTION 
28 SOHTeSTeneeecaorescoersee 
@ 29 INIT 
30 BIT NAME STATE READ AND/OR WRITE? 
: 31 can sans @onee Seereseces2neraurrae 
& 32 
33 is ERROR ? READ ONLY 
34 14 BLOCK CHECK ERROR Q READ ONLY 
a@ 35 13 CLEAR LEADER ? READ ONLY 
36 12 WRITE LOCK ? READ ONLY 
37 11 FILE GAP ® READ ONLY 
So 38 10 TIMING ERROR ® READ ONLY 
39 69 OFF LINE ? READ ONLY 
40 08 UNIT SELECT 8 READ/WRITE 
@ 41 07 TRANSFER REQUEST a READ ONLY 
42 06 INTERRUPT ENABLE ® READ/WRITE 
43 eS READY 4 READ ONLY 
& 44 04 ILBS Cd READ/WRITE 
45 03 FUNCTION BIT 02 8 READ/WRITE 
46 02 FUNCSION BIT @1 ® READ/WRITE 
& 47 61 FUNCTION BIT 00 e READ/WRITE 
48 OsWRITEoF ILE“GAP 
49 iswRITE 
ea 50 2zREAD 
$1 38BACK SPACE FILE GAP 
$2 4=sBACK SPACE BLOCK GAP 
e 53 SsSPACE FORWARD FILE GAP 
$4 6SSPACE FORWARD BLOCK GAP 
$5 7TeREWIND 
eo 56 oe GO BIT @ WRITE ONLY! 
.*) 








TAI1 MANUAL INTERVENTION TEST 
DZTACC NEW 


000011 
000012 
000015 
000200 
177776 


177774 
177772 
177576 
1775708 


060007 


000000 
600040 
000100 
800140 
0800200 
000240 
000360 
000340 
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GENERAL INFORMATION 


99008000000 000000650000000950000008080000006080000000000000000000 
eSBTTL OPERATIONAL SWITCH SETTINGS 


3@ 

8 SWITCH USE 

3@ BVP BBE SEO BOSHSe ene Denr2eero5 

708 i5 HALT ON ERROR 

3 14 LOOP ON TEST 

3@ 13 INHIBIT ERROR TYPEOUTS 
Bad il INHIBIT ITERATIONS 

76 10 BELL OW ERROR 

ge 9 LOOP OW ERROR 

3 8 LOOP ON TEST IN SUR<736> 
8 7 LOCK OW CURRENT DRIVE (ONLY VALID WITH MANUAL LOOp | 5G) 


FF POCHSSHOOOHODESEOOREHEHSCHOOOOOOSSESESHOOSSEHEDEOOSTECRCODSEOCS 
eSBTTL BASIC DEFINITIONS 


s®INITIAL ADDRESS OF THE STACK POINTER eee 1100 eve 


STACKe 1100 
eEQUIV EMT, ERROR ssBASIC DEFINITION OF ERROR CALL 
eEQUIV I0T, SCOPE s3BASIC DEFINITION OF SCOPE CALL 
s@MISCELLANEOUS DEFINITIONS 
HTs ii 3sCODE FOR HORIZONTAL TAB 
LFs 12 s9CODE FOR LIVE FEED 
Cre is #3CODE FOR CARRIAGE RETURN 
CRLFe 260 ssCODE FOR CARRIAGE RETURNeLINE FEED 
PSe 177776 29PROCESSOR STATUS WORD 
eEQUIV PS,PSW 
’ STKLMTs 177774 seSTACK LIMIT REGISTER 
PIRQs 177772 s3PROGRAM INTERRUPT REQUEST REGISTER 
DSWRs 1775768 ssHARDWARE SWITCH REGISTER 
DDIsPs 177576 seHARDWARE DISPLAY REGISTER 
s®GENERAL PURPOSE REGISTER DEFINITIONS 
ROs ge s3sGEWERAL REGISTER 
Rig $1 ssGENERAL REGISTER 
R2e $2 s3GENERAL REGISTER 
R3s $3 93GENERAL REGISTER 
R4és. g4 ssGENERAL REGISTER 
RSs L ssGENERAL REGISTER 
Rés &6 s3GENERAL REGISTER 
R7s &7 ssGEWERAL REGISTER 
eEQUIV R6,SP s3STACK POINTER 
eEQUIV R7,PC s3;PROGRAM COUNTER 
s*PRIORITY LEVEL DEFINITIONS 
PROS 8 spPRIORITY LEVEL © 
PRis 4a ssPRIORITY LEVEL 1 
PR2s 100 sePRIORITY LEVEL 2 
PR3s 140 ssPRIORITY LEVEL 3 
PR4és 200 ssPRIORITY LEVEL 4 
PRSs 240 ssPRIORITY LEVEL §$ 
PR6s 300 ssPRIORITY LEVEL 6 
PR7s 340 2ePRIORITY LEVEL 7 


s®°SWITCH REGISTER® SWITCH DEFINITIONS 
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DZTACC ,WEW 


113 
114 
115 
116 
117 
118 
119 
1208 
121 
122 
123 
124 
125 
126 
127 
128 
129 
130 
131 
132 
133 
134 
135 
136 
137 
138 
139 
140 
141 
142 
143 
144 
145 
146 
147 
148 
149 
158 
151 
152 
153 
154 
155 
156 
157 
156 
159 
160 
161 
162 
163 
1604 
165 
166 
167 
168 


BASIC DEFINITIONS 


MAINDEC 911 -DETAC-C 


s®DATA 
BITiISs 
BIT1i4s 
BITi3e 
BITi2e 
BITIis 
BITids 
BITe9s 
BITeese 
BITe7s 
BITeés 
BITeSss 
BITe4s 
BITe3s 
BITe2Zs 
BITeis 
BITeGs 
EQUIV 
eEQuiv 
EQUIV 
EQUIV 
eEQuiv 
eZQUIV 
eEQuIV 
eEQUIV 
eEQUIV 
EQUIV 


s@BASIC 


WACY11 27(¢732) 


8¥09, sue 
suee, sus 
807,807 
8W86,8W6 
80S, SUS 
BWO4, 504 
8W03,5u3 
8¥02,82 
Sw01i,3wi 
8u06, Sue 


BIT DEFINITIONS (BITee TO BITIS) 
t 


BITe9,B8IT9 
BITes, BITS 
SIT67,BIT? 
BITe6,BIT6 
BITesS,BITS 
BITO4,BIT4 
BIT03,61T3 
BIT62,81T2 
BITe1,B8I1Ti 
BIT#e,BITe 


"CPU" TRAP VECTOR ADDRESSES 
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Ca. 





te 
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169 
178 
171 
172 
173 
174 
175 
176 
177 
178 
179 
180 


BASIC DEFINITIONS 


606004 ERRVECe 4 

000018 RESVECe 16 
000014 TBITVECe14 
000014 TRTVECs 14 
000014 BPTVECes 14 
000020 IOTVECs 26 
000024 PWRVECe 24 
000030 EMTVECS 30 
000034 TRAPVECS34 
000060 TKVECs 60 
000064 TPVECe 64 
000240 PIROVECS240 
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SeTIME OUT AND OTHER ERRORS 
SSRESERVED AND ILLEGAL INSTRUCTIONS 
ss°T* BIT 

ssTRACE TRAP 

ssBREAKPOINT TRAP (BPT) 
sesINPUT/OUTPUT TRAP (IOT) SesSCOPECe 
spPOWER FAIL 

SsEMULATOR TRAP (ENT) SOERRORCS 
ss°TRAP® TRAP 

seTTY KEYBOARD VECTOR 

ssTTY PRINTER VECTOR 

s9PROGRAM INTERRUPT REQUEST VECTOR 


D>. 








7) ’ | 
TAI MANUAL INTERVENTION TEST MAINDEC<41-DETAC-C MACY11 27€732) iieJUN-76 13:51 PAGE 5S SEO 0018 
e OZTACC .WEW TAI DEFINITIONS ; 
161 sTAIl FUNCTIONS 
cS 182 600000 WFGe @ sURITE FILE GAP FUNCTION 
163 0009002 WRITES 2 sWRITE FUNCTION 
1e@4 000004 READe 4 sREAD FUNCTION 
aa) 165 000006 BSFGe 6 sBACK SPACE FILE Gap FUNCTION 
186 000010 88BGs 10 sBACK SPACE BLOCK GAP FUNCTION 
187 000012 SfFrGs 12 sSPACE FWO FILE GAP FUNCTION 
fag 186 000014 SFBGs 14 sSPACE FwO BLOCK GaP FUNCTION 
169 000016 REWINDs 16 gREWIND FUNCTION 
190 PP OSFOCSHOEOHOSEOEBHTDTGOTEHO GOES GETS OCT ED FSSUSHOGHSICESETSHSTOGIODSD 
191 
© 192 sTAil SIT ASSIGNMENT 
193 100906 ERRORS BITIS 
@ 194 04000 CRCERRe BITI4 
195 020000 LEADERs BIT13 
196 610000 WRTLOCKSBIT12 
oO 197 004000 FGAPe 8 BITi1 
198 002000 TIMERRe BITIO 
199 601000 OFFLINEsBITe9 
Q 200 #60400 UNITs sITee 
201 000200 TR,REGs BITC? 
202 600100 INT,ENs BITO6 
@ 203 600040 READYs BITeS 
204 960020 ILBSe BIT64 
205 090010 FUNC2s B8ITe3 
8 206 000084 FUNCis B8ITe2 
207 0800092 Funces BITe1 
208 006001 GOs BITee 
Py) 209 000016 FUNCTION: FUNC2¢FUNC1 oF UNCO 
210 SIOIOTOOITATATOAGATATTTOTTOTOTAOTLOLTEGTTALATTTTATTTTEETATTOTTEAT EAs 
211 DOIIOOOTTTTTTOTTATTTOAGATATTTATATTTTAT bb dGbbdasaaaasaaaaaaaasassssssedsd 
ead 21? CAIAOIOIATTTATTOTATTATTTTTTATOTATTATOATOATATTETTGTTATAGTAGAG hb bssbasssss 
213 
214 sSPECIAL REGISTERS 
Se 215 000003 ORIVEs 3 #R3 CONTAINS THE DRIVE UNDER TEST 
216 000004 TACSs§ %4 sR4 18 USED As A PCINTER TO THE TACS REGISTER 
He 000005 TADBs %5 #RS IS USED AS A POINTER TO THE TADS REGISTER, 
q 
e 219 TE UU 
226 DAITITTTTOTATOTEOTTTTTOTTATTTTTTOTTTOTTOTTTTLTETTTTTT GOAT EAAAEE AAA ESS 
6 
@ 
S 
6 
8 
3 
i?) 


EX 


221 
222 
223 
224 
225 
226 
227 
228 
229 
230 
231 
232 
233 
234 
235 
236 
237 
238 
239 
240 
241 


000174 
000176 


060200 
000204 
600210 
000214 
006220 
600224 
000230 
000234 
000240 
000244 
000256 


TAI1 MANUAL INTEPVENTION TEST 
DZTACC .WEW 


TRAP CATCHER 


001326 
001360 
001366 
001730 
607604 
007670 
007756 
010036 
016140 
010234 
010320 


MAINDEC o1 1 -DZETAC oC 


eSBTTL TRAP CATCHER 


s®ALL UNUSED LOCATIONS FROM 4 = 776 


MACY11 27(732) 
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CONTAIN A °.¢2-HALT® 


s@SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
s@LOCATION © CONTAINS @ TO CATCH IMPROPERLY LOADED VECTORS 


seSOFTWARE DISPLAY REGISTER 
sesSOFTWARE SWITCH REGISTER 


ssJUMNP TO STARTING ADDRESS OF 


08174 

DIGPREG: ,WORD 6 

SWREG? eWORD @ 

eSBTTL STARTING ADDRESS(ES) 
JMpP OOBEGINI 
JMP OOBEGING 
Jap OeBEGING 
JMP @OBEGINX 
JMP oewrcsus 
JMP CowrTSUB 
JMP oerdsus 
JMP OewGPBLK 
JMP OeRCPBLK 
JMP Oesrrcss 
JMP oeBnsrcss 


PROGRAM 
sSELECT ORIVE(S) BEFORE STARTING TEST 
SSELECT DRIVE(S) AND ADDRESSES BEFORE 
sSETUP FOR MANUAL LOOPING 

sWRITE FILE GAP FROM BOT TO EOT 
sWRITE CONTINUOUS BLOCKS OF DATA 
sREAD CONTINUOUS BLOCKS OF DATA 
sWRITE FILE GAP AMD A BLOCK OF DATA 
sREAD BLOCK OF DATA AND INTO A FILE GaP 
sSPACE Fwd FILE GAP FROM BOT TO EOT 
sBACK SPACE FILE GAPS 


Fo. 
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DZTACC .WEW TOGGLE IN ROUTINES 
242 
243 SIOOIIATATTTTATATTATATTATA TATA d da baaaaaaaaaaaaaaaaaaaaaaaaaasadsbssssa 
244 SATII IATATATIATTTTTAOTTATATTTATATAT A Ulaadaadadasaaaaaaaaaaaaaaaaasaadsbaca 
2458 
246 sTHE FOLLOWING ROUTINES CAN BE TOGGLED IW, 
247 
oe SFIITIITATTTAOATTTTTATTA TTA A Ladbadaaaadaaaaabaaaaaaaaadaraaaaariabdbssda 
4 
250 
251 e REM 4 
252 
253 
254 THE FOLLOWING ROUTINES (LOOP1, LOOP2, & LOOP3) CAN SE TOGGLED 
255 IN WHEN IT IS IMPOSSIBLE TO LOAD THE DIAGNOSTICS 
256 
237 NOTES BEFORE USING THESE ROUTINES INSURE THAT R3,R4,6 RS 
258 ARE SETUP PROPERLY, 
259 ee NOTE: IF USING SOFTWARE SWITCH REGISTER THE 
260 LOCATION GWR (81140) MUST CONTAIN 
261 ADDRESS "SWREG* (2176). 
262 eee PLACE VALUE INTO 176 eee 
263 @@ REGISTERS 3, 4, AND S ee 
264 oe MUST BE SETUP VIA MOVE INSTRUCTIONS oe 
265 
266 R3s @ IF USING DRIVE A 
267 400 IF USING DRIVE 8 
268 
269 R48 TA11 STATUS REG ADDRESS (TACS 177500) 
270 
271 RSs TAii DATA BUFFER ADDRESS (TADB 177502) 
272 
273 LOOP1 WILL LOAD THE SWITCH REGISTER INTO THE TACS. - 
274 
275 LOOP2 WILL WRITE THE CONTENTS OF THE SWITCH REGISTER 
276 ALL THE WAY TO END-OF -TAPE(EOT). 
277 
278 LOOP3 WILL READ TO EOT, DATA WILL GO TO RO, 
279 
280 NOTE: LOOP2 AND LOOP3 WILL REWIND WHEN EOT I8 REACHED AND 
2861 THEN START OVER, 
282 | 
283 # 
264 PPR III iiririiiiriiiiiiiiiyy) 
285 
286 LOAD SWITCH REGISTER INTO THE TACS 
287 PPE III III III iiiiiiiiiiiiyiriiiiiiiiy) 
268 
269 000500 22500 
290 
291 6800500 617714 0600434 LOOPis: MOV @SWR,@TACS sLOAD TACS 
292 000504 000775 BR LOOP1 3 LOOP 
293 
294 


Go. 
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DZTACC NEW WRITE SWITCH REGISTER OW TAPE FROM BOT TO £0T 


297 sURITE SWITCH REGISTER ON TAPE FROM BOT TO EOT 
298 PPSHPSLFSGCHOS HOGS FIFE DOSE DGSOSSOHGOSGOSIGHIO OG OF SATO AHS STSGSEVIHGOD 
299 000680 #608 


301 680600 900005 LOOP2: RESET sCLEAR ALL FLAGS 

302 000602 616314 “OV DRIVE, OTACS sSELECT ORIVE 

363 0680604 112714 600017 MOVB OREWINDIGO, OTACS 360 TO BOT 

304 8680618 632714 600040 163 BIT @READY, OTACS sWAIT TILL READY COMES UP 
305 606614 601775 BEO is 

306 600616 112714 980003 MOVB OURITE!GO,OTACS sSTART A WRITE 

307 0800622 105714 28% TSTB eoTacs sCHECK FOR TRANSFER REQUEST 
3068 680624 109003 BPL 38 s8n If SOT SET 

309 600626 617715 0600306 MOV OSWR, OTADB sSEND DATA TO TALI 

318 680632 600773 BR as LOOP 

311 8600634 632714 900040 383 BIT @READY, OTACS sD01D READY SET? 

312 600640 601357 BNE LOOP2 sSTART OVER IF YES 

313 8600642 600767 BR 2 3LooP 


316 PRAXIS III) 


318 sREAD FROM BOT TO EOT 
319 FF OCRSOSSCOSESOSEOH SHOES SOSSHSELOOSEESEOSSOSESODESODEOSOSOOSOOCOR 


321 006700 28700 


323 e9e788 800005 LOOP3s RESET sCLEAR ALL FLAGS 
324 600702 9810314 MoV DRIVE, OTACS sSELECT DRIVE 

325 000704 112714 0600017 MOVE OREWIND GO, OTACS sSTART A REWIND 

326 600718 632714 900040 163 BIT @READY, OTACS sWAIT OW REWIND TO FINISH 
327 000714 0901775 BEG is 

328 600716 112714 980005 MOVB @READ!GO, @TACS sSTART A READ 

329 000722 105714 263 TSTB eTacs sCHECK TRANSFER REO 
338 008724 1069002 BPL 38 s8R IF NOT SET 

331 600726 911500 MOV @TADB, RO sPICKUP THE DATA 
332 600730 600774 BR 28 3LOOP 

333 800732 632714 600040 383 BIT @READY, OTACS sCHECK READY 

334 009736 601360 BNE LooP3 sSTART OVER 

335 900740 909770 BR 28 3LOOP 


, 


Had 








336 
337 
338 
339 
340 
341 
342 
343 
344 
345 
346 
347 
348 
349 
350 
351 
352 
353 
354 
355 
356 
387 
358 
359 
360 
361 
362 
363 
364 
365 
366 
367 
368 
369 
3708 
371 
372 
373 
374 
375 
376 
377 
378 
379 
380 
381 
382 
383 
364 
385 
386 
387 
306 
389 
390 
391 


001100 
001160 
001162 
001103 
001104 
001106 
001110 
001112 
oo1114 
001115 
001116 
001120 
001122 
001124 
001126 
061130 
001132 
001134 
001135 
001136 
001140 
001142 
601144 
001146 
0011508 
001152 
061154 
001155 
001156 
001157 
001160 


001162 
001164 
001166 
901170 
001172 
001176 
001177 
001200 


0012062 
001204 


TAI MANUAL INTERVENTION TEST 
DZTACC NEW 


COMMON TAGS 


0608 
602 
012 
600 
000000 


000000 
000000 
600000 
000000 
177607 

077 

015 
0060612 


000377 


177800 
177501 
177502 
177503 
000260 0600262 
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eSBTTL COMMON TAGS 
33 DPESSHEGOSHOSOSTRSESSHFISHRNS 1 FBSLHSSSHRATOSSHSFGHGIL PHASES SWERYODEEE 
ge@THIG TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
g@USED IN THE PROGRAN, 
281100 
OCHTAG: 3) START OF COMMON TAGS 
SPASS: ,WORD 6 ssCONTAING PASS COUNT 
GTSTNM:s BYTE 6 ssCONTAING THE TEST NUMBER 
SERFLG: .BYTE 6 ssCONTAING ERROR FLAG 
eICcNTs ,WORD @6 ssCONTAINS SUBTEST ITERATION CouNT 
SLPADR: ,WORD © ssCONTAINS SCOPE LOOP ADDRESS 
SLPERR: .WORD 6 ssCONTAINS SCOPE RETURN FOR ERRORS 
SERTTL: ,WORD 6 gsCONTAINS TOTAL ERRORS DETECTED 
SITEMB: ,BYTE 6 ssCONTAINS ITEM CONTROL SYTE 
GERMAX: BYTE i ssCONTAINS MAX, ERRORS PER TEST 
SERRPCs ,WORD @ ssCONTAING PC OF LAST ERROR INSTRUCTION 
SGDADR: WORD 6 gsCONTAINS ADORESS OF °GOOD* DATA 
SBDADR: .WORD 6 g3CONTAINS ADDRESS OF °BAD° DATA 
SGDDAT: .WORD 8 s9CONTAINS °GOOD’ DATA 
SBODAT: WORD r) ssCONTAINS °BAD* DATA 
WORD @ seRESERVED-oNOT TO BE USED 
eWORD 6 
SAUTOBs: .BYTE 86 SsAUTOMATIC MODE INDICATOR 
SINTAG: .BYTE 6 se INTERRUPT MODE INDICATOR 
eWORD @ 
. SUR: WORD DSWR spADORESS OF SUITCH REGISTER 
DISPLAY: ,WORD ODISP s~@ADDRESS OF DISPLAY REGISTER 
TKS: 1775860 geTTY KBD STATUS 
OTKBs 177562 ssTTY K8D BUFFER 
6TPSs: 177564 g3TTY PRINTER STATUS REG, ADDRESS 
GTPB: 177566 seTTY PRINTER BUFFER REG, ADDRESS 
SNULL: ,BYTE 9 ssCONTAINS NULL CHARACTER FOR FILLS 
SFILLS: ,8YTE 2 gsCONTAINS © OF FILLER CHARACTERS REQUIRED 
SFILLC: ,BYTE 12 se INSERT FILL CHARS. AFTER A “LINE FEED*® 
STPFLG: BYTE @ se°TERMINAL AVAILABLE® FLAG (BIT<O7>s0eYES) 
SREGAD: WORD 8 ssCONTAINS THE ADDRESS FROM 
ssWHICH (CEREGO) WAS OBTAINED 
SREGO: ,WORD @6 ssCONTAINS ((SREGAD) +6) 
GREGis ,.WORD e ssCONTAINS ((SREGAD)+2) 
OTIMES: 8 s3MAX, NUMBER CF ITERATIONS 
SESCAPE:0 ssESCAPE ON ERROR SDDRESS 
SBELL: ,.ASCIZ <207><377><377> s;3CODE FOR BELL 
SQUES: ,.ASCII /?/ ssQUESTION MARK 
SCRLF: ,ASCII <15> ssCARRIAGE RETURN 
6LFs eASCIZ <12> s3LINE FEED 
FSSSSHSSSSSSSSSEHESSIFSSESHSSHSSHSSHHHSHHSHSHSSHSSSHHHSHHHHOHHCOSEOGES 
SAVPC: ,WORD ra) #STORAGE FOR THE PC 
SAVPS: ,WORD 6 sSTORAGE FOR THE PS 
TACSL: 177500 sLOW BYTE ADDRESS OF TACS 
TACSHs 177501 sHIGH BYTE ADDRESS OF TACS 
TADBL: 177502 #LOW BYTE ADDRESS OF TADB 
TADBHs 1775083 sHIGH BYTE ADDRESS OF TADB 
TAVEC: 260,262 #TAii1 VECTOR ADDRESS 
> 


" 


TAI MANUAL INTERVENTION TEST 


COMMON TAGS 


MAINDEC $11 -DZTACoC 


TAPRIO? 300 
DRVAEY: 6,0 
ORVPNTs DRVKEY 
ASKKEY: © 
CURDRV: @ 


WACY11 27(732) 
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sTAiil BR LEVEL 6 
sORIVE SELECT KEY? 


sCURRENT DRIVE BEING TESTED 


JA 
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DZTACC NEW ERROR POINTER TABLE 


397 eSBTTL ERROR POINTER TABLE 


399 s®THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR, 

4008 s@THE INFORMATION If OBTAINED BY USING THE INDEX NUMBER FOUND In 

401 s@LOCATION SITEMS, THIS NUMBER INDICATES WHICH ITEM IN THE TABLE 18 PERTINENT, 
402 pOnNOTEIs IF GITEMBR 16 © THE ONLY PERTINENT DATA 18 (SERRPC). 

403 s@NOTE2s EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 


405 30 eM ssPOINTS TO THE ERROR MESSAGE 
406 78 ON ssPOINTS TO THE DATA HEADER 
407 3 DT ssPOINTS TO THE DATA 

408 3° or gsPOINTS TO THE DATA FORMAT 





ro 001236 SERRTB: 
41 
413 sNOTES ALL NUMBERS ARE TYPED AS GeDIGIT OCTAL hUMBERS 
414 
415 s ITEM i 
416 001236 613061 eM SSTATUS PROBLEM 
417 001240 613227 DH1i 2ePC TACS 
418 601242 613340 OTi sSERRPC SREGO 
419 0601244 69890600 8 
420 
421 , ITEM 2 
001246 613160 EM2 sREADY FAILED TO SET 
423 0601250 613244 OH2 3PC TACs WAIT ADDRESS 
424 001252 613346 DT2 #GERRPC SREGO savec 
425 001254 600000 8 
426 
427 s ITEM 3 
4268 0601256 613126 EM3 sTRANSFER REQUEST FAILED TO SET 
429 001260 613244 DH2 PC TACS WAIT ADDRESS 
430 601262 613346 DT2 sSERRPC 6REGO SaAVvPC 
431 0601264 6980000 @ 
432 
433 s ITEM 4 
434 001266 0613167 EMG THE WRONG FLAG SET 
435 001270 613244 DH2 3PC TACS WAIT ADDRESS 
436 001272 613346 DT2 sSERRPC S§REGO SAvePCc 
437 0601274 900000 (2) 
4386 
439 s ITEM 5 
440 001276 013212 EMSs sDATA PROBLEM 
441 601300 613301 OHS 3PC TACS EXPECT RCV°D 
442 601302 013356 ors sSERRPC §REGO SGDDAT sBDDAT 
443 601304 9600000 8 


@®eoeooeoeee@e#eeeeeee#e?eeewee&#eeee@ 
ee 
wD 
ho 


TAI11 MANUAL INTERVENTION TEST 


DZTACC NEW 


446 
447 
448 
449 
456 
451 
452 
453 
4s4 
4ss 
456 
4s7 


ERROR POINTER TABLE 


013402 
913454 
013370 
oee0cee 


013431 
013471 
013376 
000000 


MAINDEC 41 -DZTAC eC 
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sTAii FAILED TO RESPOND 

sPC TACS 

sSERRPC TACS 

sBOTH NUMBERS ARE TYPED AS OCTAL NUMBERS 


s¥O DRIVES AVAILABLE 





Lo. 





, 7 


456 
4s9 
460 
461 
462 
463 
464 
465 
466 
467 
468 
469 
470 
471 
472 
473 
474 
475 
476 
477 
478 
479 
480 
461 
462 
463 
484 
465 
486 
467 
468 
469 
490 
491 
492 
493 
494 
495 
496 
497 
498 
499 
500 
501 
502 
503 
504 
505 
506 
$07 
508 
509 
510 
$11 
$12 
513 


¢ 


eeaeoeeesese#eeeense7e0eeeeeeeee ee 


001326 
001330 
001336 
001344 
001346 
001354 
001356 
601360 
001364 
001366 
061372 
001374 
001400 


001400 
001404 
001406 
001412 
001414 


061420 
001426 
001434 
001442 
001458 
601456 
001464 
001472 
001500 
001506 
001512 
001516 
001524 
001532 


001540 
001544 
001552 
001560 
001566 
001574 


001576 


005005 
012737 
122737 
001015 
022737 
001011 
000403 
612705 
800405 
012705 
000402 
012705 


012706 
005026 
022706 
001374 
012706 


012737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
016767 
005067 
005067 
112767 
012767 
012767 


013746 
012737 
012767 
012767 
622777 
001012 


TA12 MANUAL INTERVENTION TEST 
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041101 
000005 


061160 
001140 
001100 


006046 
000340 
006320 
000349 
012304 
000340 
0123708 
000340 
004270 
177454 
177452 
000001 
001524 
001532 


000004 
001600 
177570 
177570 
177777 





MAINDEC11-DZTAC@C 
START OF TEST 


001224 
000041 


001216 


090020 
000022 
000030 
000032 
000034 
000036 
000024 
000026 
004260 


177371 
177354 
177350 


000004 
177360 
177354 
177344 
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UA 
PITTTIITTATATATTATITTTTATTTATATTTTTTAATTTTOTTALATATTALTTTETTTEATALAS ETE 
F PPOOOSOOO OHO SETHE HELSOO SO SOOSODECOEESHODOOOHOOOEOSORHEOOOODOHO08 


sBEGING 18 FOR NORMAL START 

sBEGIN2 IS FOR DRIVE SELECTION . 
sBEGIN3 IS FOR DRIVE & ADDRESS SELECTION 

sBEGING IS FOR MANUAL OPERATION 


BEGINis CLR 
MOV 
CMPB 
BNE 


BEGIN2: MOV 
BEGIN}: MOV 


BEGING: MOV 
BGNCMN: 


RS sWORMAL START 

9°AB, CODRVKEY 

@5,0041 sCASSETTE DDP? 

BGNCAN 3GO0 BEGIN COMMON CODE IF NO 
€260,0@TAVEC sSTANDARD VECTOR? 

BGNCMN 3GO BEGIN COMMON CODE IF HO 
BEGIN} sGET ORIVES AND ADDRESSES 
#1,R5 gASK FOR ORIVES FLAG 

BGNCMN sBEGIN COMMON CODE 

@2,R5 sASK FOR ORIVES AND ADDRESSES 
BGNCMN 

@3,R5 


SBTTL INITIALIZE THE COMMON TAGS 
s3;CLEAR THE COMMON TAGS (SCMTAG) AREA 


MOV 
CLR 
CMP 
BNE 
MOV 


6SCMTAG, R6 seFIRST LOCATION TO BE CLEARED 
(R6)¢ ssCLEAR MEMORY LOCATION 
OSWR,RG 3 3D0ONE? 

76 3#LOOP BACK IF NO 

eSTACK, SP ssSETUP THE STACK POINTER 


ssINITIALIZE A FEW VECTORS 
MOV 


MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
CLR 
CLR 
MOVB 
MOV 
MOV 


@SSCOPE,@8IOTVEC »sIOT VECTOR FOR SCOPE ROUTINE 
0340,@8I0TVEC+2 ssLEVEL 7 

OSERROR, OSEMTVEC ;;EMT VECTOR FOR ERROR ROUTINE 
9340, @8EMTVEC+2 ssLEVEL 7 

OSTRAP,@OTRAPVEC ;;TRAP VECTOR FOR TRAP CALLS 
6340, 08TRAPVEC¢2;LEVEL 7 

OSPWRON,@OPWRVEC 3;POWER FAILURE VECTOR 


0340,@@PWRVEC+2 3;LEVEL 7 ° 
SENDCT,SEOPCT  33S5ETUP END-OF “PROGRAM COUNTER 

STIMES seINITIALIZE NUMBER OF ITERATIONS 
SESCAPE s3CLEAR THE ESCAPE ON ERROR ADDRESS 
@1,SERMAX s3ALLOW ONE ERROR PER TEST 

@.eSLPADR sPINITIALIZE THE LOOP ADDRESS FOR SCOPE 
@eeSLPERR 33SETUP THE ERROR LOOP ADDRESS 


s3SIZE FOR A HARDWARE SWITCH REGISTER, IF NOT FOUND Or If IS 
ss;EQUAL TO A *o1*, SETUP FOR A SOFTWARE SWITCH REGISTER, 


MOV 
_ MOV 
" mov 

MOV 
‘ CMP 
BNE 


@*SERRVEC,°(SP) 33SAVE ERROR VECTOR 
0646, @SERRVEC 33SET UP ERROR VECTOR 


eO0SWR, SHR s9SETUP FOR A HARDWARE SWICH REGISTER 
SODISP,DISPLAY ;;AND A HARDWARE DISPLAY REGISTER 
9°1,0SWR s3TRY TO REFERCNCE HARDWARE SWR 
666 s9BRANCH IF NO TIMEOUT TRAP OCCURRED 
s3AND THE HARDWARE SwWR IS NOT @ 1 
658 ssBRANCH IF NO TIMEOUT m: 
\ 
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DZTACC NEW INITIALIZE THE COMMON TAGS 
$14 001600 9812716 001606 646: MOV 9658,(SP) 3398ET UP FOR TRAP RETURN 
$15 601604 600002 RTI 
$16 601606 0812767 000176 177324 6583 MOV @SWREG, SWR 73POINT TO SOFTWARE SwWR 
$17 001614 912767 000174 177320 MOV SO0ISPREG, DISPLAY 
$18 601622 612637 900004 6683 MOV (SP)¢,@@ERRVEC 33RESTORE ERROR VECTOR 
$19 
$20 eSBTTL TYPE PROGRAM NAME 
$21 33 TYPE THE NAME OF THE PROGRAM IF FIRST PASS 
$22 001626 0605227 177777 Inc $e} ” s3FIRST TIME? - 
$23 601632 061036 BNE HERE 33BRANCH IF NO 
524 601634 622737 806014 0600042 CMP @SENDAD,6842 ps ACToi1? 
$25 001642 6081432 BEOQ HERE ¢3BRANCH IF YES 
$26 0601644 104401 001702 TYPE oMSGID seTYPE ASCIZ STRING 
$27 »SBTTL GET VALUE FOR SOFTWARE SWITCH REGISTER 
528 0601650 005737 0600042 TST e042 s7ARE WE RUNNING UNDER XXDP/ACT? 
529 901654 601006 BNE 678 s7BRANCH IF YES 
530 601656 626727 177256 0600176 CMP SWR, @SWREG ssSOFTWARE SWITCH REG SELECTED? 
$31 001664 901005 BNE 688 3sBRANCH IF NO 
532 001666 104405 GTSWR 33GET SOFTeSWR SETTINGS 
533 001670 000403 BR 666 
534 601672 112767 9600001 177234 6783 MOVB #1,S8AUTOB 33SET AUTO@MODE INDICATOR 
535 0601700 68s: 
536 601700 600413 BR HERE 33GET OVER THE ASCIZ 
$37 33MSGID3 eASCIZ <CRLF>/MAINDEC211 °DZTAC*C/<CRLF> 
538 601730 HERE? 
539 FPOSSSSOSSSSSSSESESFSSESSOSEECESSSHSSSESSOSHEHEHSESECSSEOSOECOOES 
540 FPSPSSHHSSHSSSCHSSSSESESESESESSSESSESSHSSOSHOSEHSSHFHHHHSSHHOTOCOOOS 
541 
542 s;THE CONTENTS OF RS DETERMINES WHAT WILL BE DONE 
543 ; 
544 3 RSs3 MANUAL OPERATIONS 
545 3 RSs2 ASK FOR DRIVE(S) AND ADDRESSES (TACS AND VECTOR) 
5456 ; R521 ASK FOR DRIVE(S) 
$47 F] R580 DON’T ASK FOR ANYTHING 
548 3 
549 PP SPORHH OS EPSGCEGSFSTHVSSOSTHLSBES AGS HSHKFISSHSHRSEHHIHBTTPIOTOROTD 
$509 001730 010504 BEGINX: MOV RS,R4 sCOPY RS 
551 0601732 0605305 DEC RS sASK FOR DRIVES? 
552 0381734 002406 BLT CHKADR 38R IF NO 
$53 601736 0904737 007036 JSR PC, @@ASKDRV 3GO0 GET DRIVES TO BE TESTED 
554 001742 605305 DEC RS sASK FOR ADDRESSES? 
555 0601744 0024062 BLT CHKADR 38R IF NO 
$56 0601746 0604737 007146 JSR PC, @@ASKADR 3GO GET TAi1 ADDRESSES 
557 FFSSHSSSSHSSSSSSSOSHSSSSOSSOHOHSHOHOHSESESSOSSOSSSHSOSSETOSSHOOOOE® 
558 PPPSSSTFSHHSSOHSSHFE OSS HFOESOG RSE EEOOEES GOES OO TESHESHCEOEEUEH EAS 
559 
560 sCHECK THAT "TACS" WILL RESPOND TO ADDRESSING 
561 : 
$62 31. TIMEOUT OCCURRED 
563 ; A. TYPE ERROR MESSAGE 
564 ? B. EXAMINE R4 
565 3 1. R420 GOTO BEGINX 
566 ? 2. R480 EXAMINE (42) 
567 ? A, (42)80 GOTO BEGINX 
$68 3 B. (42)>@ GOTO SENDAD 
Sty ’ 


AS 





a en ame 


TAI1 MANUAL INTERVENTION TEST 
DZTACC , NEW 


$70 
571 
$72 
573 
574 
575 
576 
$77 
$78 
$79 
$80 
$61 
562 
583 
564 
ses 
586 
$07 
ses 
$89 
596 


001752 
001760 
061762 
001766 
001770 
091772 
001774 
002002 
002004 
002006 
002016 
002014 
002016 
002020 
002024 
602026 
002032 


GET VALUE FOR SOFTWARE SWITCH REGISTER 


012737 
005600 
005777 
600462 
005200 
022626 
612737 
005700 
001412 
104201 
012705 
005704 
001344 
013700 
001741 
000137 


001770 
177220 


000042 
006014 


MAINDEC#11eDZTAC@C 


000004 


MACY11 27€732) i1°J3UN@76 13:51 PAGE 15 


TIMEOUT DIDN°T OCCUR 
A, CONTINUE 


CHKADRs MOV 


CLR 


(SP), (SP)¢ 
GERRVECS2, OGERRVEC 


33 009000000000000000000000000000000000000000000000000000000000000 


sIN CASE OF TIMEOUTS 
2USE AS A SWITCH 

sSEE IF TAI1 RESPONDS 
38R IF NO TINEOUT 

sCOME HERE OW TIMEOUT 
sCLEANUP THE STACK 
gRESTORE TIMEOUT VECTOR 
#DID A TIMEOUT OCCUR? 
36R IF NO 

sTAi1 FAILED TO RESPOND 
sORIVES & ADDRESSES 
sOPERATOR INPUTS? 

78r IF YES 

3GET MONITOR RETURN ADDRESS 
78R IF WO MONITOR 

360 TO END 








63 








TAI] MANUAL INTERVENTION TEST 


DZTACC NEW 


002032 
002036 
002042 
002044 
002050 
602052 
002056 
002068 
002062 
002064 
002066 
002072 
002074 
002076 
002162 
002106 
002112 
002114 
0021206 
002122 
002124 
602126 
002130 
062134 
002136 
002140 
002144 
002146 
602152 
002156 
002160 
002164 
002170 
002172 
002176 


HAINDEC $4 1 oDETAC eC 








GET VALUE FOR SOFTWARE SWITCH REGISTER 


104401 
012737 


001224 
010654 


010654 


000042 


006014 
600003 


175613 
001232 


601702 
001224 001230 


MACT11 27(732) i11°JUN°76 13951 PAGE 16 SEQ 0029 
2 FSOSSSSHOSHSSSSSHSSSHHSHOHSHSSSHHSHHESSHHSHHSHSHHSHHHHHSSOOOOCOS 
$F OHSSOHSOSSHSHOSHSOSSHOHSHSHHHSHSHHHHESSSSHHOSOHOOSHHHSHSHOHOHOSOO 
sMAKE SURE THE ORIVES IN THE DRIVE TABLE CAN BE TESTED 
5 
st. DESIRED ORIVES CAN HOT BE TESTED 
5 A, TYPE ERROR HESSACE 
t B. EXAMINE RG 
g i. R4>@ GOTO BEGINE 
a 2. Rée® EXAMINE (42) 
r A. (42)88 GOTO BEGINXZ 
3 B. (42)>8 GOTO SENDAD 
3 
sit. BOTH DRIVES IN THE TABLE BUT ONLY OWE OF THEN CAN BE TESTED 
3 A. CLEAR BAD DRIVE FROM THE ORIVE TABLE 
3 8B, CONTINUE IN PROGRAM 
3 
sIII. DESIRED DRIVE(S) CAN BE TESTED 
3 A, CONTINUE IN PROGRAM 
3 
3 9000888888 000800808 6808888888 0508 08008080 0808800800900000800000 
CHEKDRV: MOV OORVKEY, RO sPICKUP ADDRESS OF ASCII DRIVE KEY 
JSR PC, COEXAN 3GO0 EXAMINE FIRST ORIVE 
BR 18 sOK TOC TEST©--GO CHECK WEXT 
nOVB 1(RO), (RO) pREPLACE 18T WITH 28D 
8£0 26 38R IF HO 2ND DRIVE SELECTED ° 
JSR PC, OeEXAN 9GO EXAMINE DRIVE 
BR 28 sOK TO TEST 
CLR (Re) sCLEAR DRIVE CODES 
BR 26 
183 Inc Re gPOINT TO 24D 
JSR PC, CoEXAM 9GO EXAMINE DRIVE 
BR ri) 30K TO TEST 
CLRB (Re) sCLEAR 28D 
283 MOV OORVKEY, RO sRESET ADDRESS POINTERS 
MOV RO, OCORVPNT 
CMPB (RO), 1 (RO) 318T & 2ND? 
BNE 38 38R IF WO 
CLRB 1¢CR®) sYES~--CLEAR 28D 
383 Tst (RO) gANY DRIVES? 
BEQ ss s8R IF NO 
BR MANUAL 
583 ERROR 202 sO ORIVES AVAILABLE 
MOV 62,58 sDORIVES & ADDRESS 
TST R4 gOPERATOR INPUTS? 
BNE BEGINX sBR IF YES 
MOV 0¢42,R0 sGET MONITOR RETURN ADDRESS 
BEG BEGINX 340 MONITOR 
JMP @esENDAD 360 TO END 
MANUAL: CMP R4,83 
BNE OK 
MOV 71,R4 
OKs MOV R4, COASKKEY 
BR START 
PWRST: TYPE o*8GID sPOWER FAIL RESTART 
MoV OORVKEY, OGDRVPNT 
c3 


a 


TAI MANUAL INTERVENTION TEET 


DETACC MEW 


002204 
002212 
002216 
002224 
002230 
002234 
002240 
062242 
002250 
002254 
002256 
002262 
002266 
002276 
002274 
002274 
002300 


002324 
002324 
0062330 
002334 
002340 
002342 
602344 
002350 
002354 
002360 
002362 
002364 
002366 
002374 
002376 
062400 


002400 
002404 
002406 
602410 
002414 
002420 


013777 
oe0se77 
012737 
013704 
013705 
003737 
061003 
012737 
005037 
805663 
013701 
123127 
001462 
012703 


104401 
000411 


112167 
104401 
104401 


001001 
104405 


005737 
001406 
010314 
112714 
032714 
001775 


001220 
177002 
000340 
001206 
001212 
001100 


077777 
001102 


000400 
002362 


176704 
001234 
001177 


001224 
001230 
001232 


000176 


000042 


000017 
000040 


MAINDEC 11 eDZTAC HC 
GET VALUE FOR SOFTWARE SWITCH REGISTER 


177004 
177776 


006732 


176544 


MoV 
CLR 


START? 


18% CLR 


936583 
6463 
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OCTAVECS2, OTAVEC sSETUP TA11 TRAP VECTOR 
OTAVECS2 

0346, 00PS sLOCKOUT ALL 1/0 INT 
@OOTACSL, TACS sSETUP TACS 

OOTADBL, TADB sSETUP TADS 

CeePpass sIf FIRST PASE SETUP FOR EXTRA LONG WAIT LOOPS 
ig sOTHERWISE USE OLD VALUES 
O°CBITIS, COHAXCHT 

OoeTSTHM sZERO THE TEST NUMBER 
ORIVE sSET ORIVE TO °A* 
COORVPHT, Ri sGET ORIVE POINTER 
CR1),0°A 18 If ORIVE °A*? 

TORV s8Rn If YES 

GUNIT, DRIVE sSET ORIVE TO "B° 

2688 ssTYPE ASCIZ STRING 


648 3sGET OVER THE ASCIZ 
<1S><12>eTESTING DRIVE © 


(Ri )e,CURDRV 
eCURDRV 
eSCRLF 

c«Ri) 


is 
OORVKEY, Pi 
Ri, @eDRVPNT 
OOASKKEY 

28 

RO 


sTHIS CODE 18 FOR ACTi1 & DOP 


283 TST 
BEG 
MOV 
MOVB 

363 BIT 
BEOQ 


0042 

TsTi 

DRIVE, @TACS 
@REWIND!GO,@TACS 
@READY, @TACS 

38 


sSETUP TO TYPE CURRENT DRIVE 


sTYPE A Cr 6 LF 

gLAST ORIVE SEEN SELECTED 

38n IF HO A 

gRESET ORIVE POINTER 

sSAVE ORIVE POINTER FOR NEXT TINE 
360 START TESTING IF WO MANUAL 

’ OPERATIONS REQUESTED 


sGIVE CONTROL TO THE OPERATOR 
sUSING S/W SWITCH REG? 

gNOe GET OUT 

GET VALUE 

sCONTINUE 


318 THERE A MONITOR? 
3GO START TESTING IF WO 
sIF YES SELECT ORIVE 
$SEND TAPE TO BOT 

sWAIT ON READY 

sPALL THRU IF READY®) 


D3 





OSTACC NEW 


696 0662422 
697 002424 
698 902432 
699 602436 
700 602440 
701 002442 
702 602444 
703 692450 
764 002452 
78S 002456 
706 002460 
787 002466 
708 002472 
709 0802476 





002502 
714 662504 
715 002512 
716 002516 
717 002520 
718 002524 


720 002574 
721 002574 
722 682600 


724 002646 


@eeeeeeeseeee#e#e?e#e'e#ee0680e0 @ 
ad 
ae 
Sat 





164401 
000422 





601001 
104601 


12) 
eT 


TAI MANUAL INTERVENTION TEST 


006001 
176362 


000012 
002700 
607436 
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GET VALUE FOR SOFTWARE SWITCH REGISTER ‘ 


176534 


006732 


176454 


176310 


176222 


UU i AGS i did bd dd iid 

OFITAIIATOTAATTATATATTATATTTTEEETTATLTLUOLATTATATAATATTETATEATETATTET ST 
3 90900000 0000080000 00000000000 00000000000 C000000000000 00000000000 

STHES IgN°T A REAL TEST BUT A SHALL ROUTINE TO DETERMINE THE HAZ, 

sTINE FOR THE WAIT LOOPS (WAIT FOR “READY AND "TRANSFER REQUEST) 

$9 99O000000008000000000 000000000000 00EF OS OFOOCCOREDDLECOLOONNECOE 


s@TEsT 1 ROUTINE TO DETERMINE TIME OF WAIT LOOPS 
J LS SEHSOOSIETEDOOEO SHADERS ODES HOEEEETOSHGRROLSEOEOOROTERHEREROD OD 
TSsTiz scope 

Hoy 61, S8TIMES 33D0 § ITERATION 

T8sTt @88PA8S8 etS THIS THE FIRST PASS? 

BNE T6T2 390R If wo 

RESET 

MOV DRIVE, @TACS sseuece | THE ORIVE 

MOVB @REWINDIGO,@TACS : pSTART A REWIND 

WAITREADY sWAIT FOR READY 

MOVB eUPG1GO,@TACS sWRITE A FILE GCap 

WAITREADY sWAIT ON READY 

SUB COHGHTIN, COMAXCKT 3GET THE TIME IT TOOK 

rnc @OMAXCNT gMAKE IT SIGGER 

ROL OOMAXCNT 

ROL @OMAXCNT 
FP SPSSSHSHSSHSSSHOSSSSHSHHHECSSESOSHHGOHSHSHHSOSSHHHSELOSHCHSHCEHOCOS 
s°TEST 2 SETUP FOR MANUAL INTERVENTION 


3 3980009800000 08000 OSS SCOOSOECOSHEEHEHHSESEOCOCEESESESOREOEOOCCCED 
TST2: SCOPE 


MoV @1,8TINES 39D0 1 ITERATION 
Tst OPASS sI8 THIS THE FIRST PASST 
BNE T8T3 seSKip TYPE OUT IF YEs a 
TYPE 0658 seTYPE ASCIZ STRING 
BR 646 s9GET OVER THE ASCIZ 
936583 ,ASCIZ <15><12>*DIRECTIONS WILL BE TYPED OW THE TTY* 
6463 
TYPE 0678 seTYPE ASCIZ STRING 
BR 668 39GET OVER THE ASCIZ 
396762 ,ASCIZ <15><€12>°HIT °CR® WHEN READY TO CONTINUE®"<1$><12> 
6663 
FF SSSSSSSSSSSSHSSHSHSHSSSESSSSHSHHHSOSHHSSHSOSHHSHSHSHSESHCEEOSESO 
s*TEST 3 SETUP FOR POWER DOWN TUGS TEST 


FP OPSOSSSSSSSSSSHOOSEOSOHCHOTEOTHOHSSSHOHOOSESOHSESOHSESOCRSOCOES 
TST3: SCOPE 


MOV 010, ,8TINES #300 10, ITERATIONS 

MOV €16,6LPADR 33S8ET SCOPE LOOP ADDRESS 

JSR RO, @SASKQUES 

MTUPUR 

BR is 900 THIS TEST 

JMP oeTsTé sSKIP POWER FAIL TESTS 
183 RESET sCLEAR INTERFACE 

MOV ORIVE, OTACS sSELECT ORIVE 

BIT sOFFLINE,@TACS 318 *OFFLINWE® ON A ONE? 

BKE TSsT4 33BR IF YES 

ERROR 1 s°OFFLINE® BIT ISN°T OW A ONE 
FPSOSSSSSSHHSSHSCEOHESSHOOS HCHO HHSESOSHHSSOSHHHEHOCHOCEU HOCHST ECED 
s@TEST 4 TEST “OFFLINE® WHEN TU6@ IS POWERED DOWN . 


JP OSSSSEOSH SS HOESESHSOHOESSSOEHHESOHSSHSHSSHEHHOSSHSEESCOCOSHSEOS 
TST4: SCOPE 


E3 





@®eeeee@eeeoe#s8#e8ee#e#e#ee#eeeeeeeee @ 


TAI MANUAL INTERVENTION TEST MAINDEC?11°-DZTACHoC MACY11 27(732) ifeJUN°76 13:51 PAGE 19 SEQ 0032 
OZTACC .WEW T4 TEST OFFLINE" WHEN TUG@ IS POWERED DOWN 
744 662716 612767 603062 176244 MoV OTSTS,SESCAPE  s3ESCAPE TO TEST S OW ERROR 
74S ©02724 112714 600001 MOVB ourG}GO,@TACS sTRY TO DO A “WG? 
746 802730 104412 WAITREADY sWAIT IN "READY" 
747 602732 605714 Tst eoracs sCHECK FOR AN “ERROR® 
748 4602734 100461 BMI 1a s8R IF “ERROR 8) 
749 @62736 104001 ERROR i 3 "ERROR" 86 
750 682740 112714 0960063 iss MOVB @WRITESGO,OTACS sTRY TO DO A *WRITE® 
751 002744 104412 WAITREADY sWAIT OW "READY® 
732 ©62746 005714 TST erTacs sCHECK ERROR FLAG 
733 682750 100461 BMI 2s 
754 0602752 104001 SRROR 1 9 "ERROR" 86 
73S 602754 112714 ee90005 283 MOVB @READ!IGO,@TACS sTRY TO DO A *READ® 
756 602760 104412 WAITREADY gWAIT OW "READY 
757 ©02762 905714 TST eTacs sCHECK ERROR FLAG 
758 602764 100401 BMI 38 $ 
759 @02766 104001 ERROR 1 9 "ERROR* 86 
768 602778 112714 600907 383 MOVB @BSFG!IGO,eTACS sTRY TO DO A *B8SFG" 
761 @02774 104412 WAITREADY sWAIT ON “READY 
762 002776 905714 TST eracs sCHECK ERROR FLAG 
763 083000 100401 BMI 4s 
764 603002 104001 ERROR 1 3 "ERRORSO 
76S 603004 112714 ©60011 483 MOVB 6888GC1G0O,eTACS sTRY TO DO A °BSBG" 
766 003010 104412 WAITREADY sWAIT OW °READY® 
767 ©03012 605714 TsTt eTacs sCHECK ERROR FLAG 
768 083014 100401 BMI 58 
769 063016 164001 ERROR 1 3 "ERROR" 86 
778 003020 112714 000013 58s MOVB @SFFG!iGO,eTACS sTRY TO DO A “"SFFG* 
771 ©03024 104412 WAITREADY sWAIT ON °READY*® 
772 4003026 605714 Tst eTACS sCHECK ERROR FLAG 
773 663030 100401 BMI 68 
774 0603032 104001 ERROR i 3 "ERROR" sO 
77S 003034 112714 606015 683 MOVB @SFBG!GO,e@TACS sTRY TO DO A *SFBG* 
776 803040 104412 WAITREADY sWAIT ON “READY* 
777 4003042 0605714 TST eTacs sCHECK ERROR FLAG 
778 003044 1800401 BMI 78 
779 683046 1864001 ERROR 1 7 "ERROR" 80 
780 603050 112714 0600017 783 MOVB @REWIND!GO,@TACS sTRY TO DO A REWIND 
781 6803054 605714 Tst eTACcS sCHECK ERROR FLAG 
782 0603056 100401 BMI TSsTs 338R IF ERRORS) 
783 603060 104001 ERROR 1 3 "ERROR" 86 
Taq TORS 
785 s*TEST 5 POWER UP THE TUG@ 
786 FP PSHSSSSOSHSSSOSTOHSSOSHSCHSHHSHOSOHEHHSEHOSSOHSHHSSEOTOS HOOD O® 
787 6803062 0800004 TSTSs SCOPE 
786 003064 612767 0603104 176014 MOV 626,8LPADR 33SET SCOPE LOOP ADDRESS 
789 003072 604037 007436 JSR RO, OGASKQUES 
* 798 @03076 012714 MPWRUP sMESSAGE POINTER 
791 603108 600240 NOP 
792 603102 680005 iss RESET 
793 603104 610314 283 MOV ORIVE,@TACS sSELECT DRIVE 
794 003106 104412 WAITREADY sWAIT ON READY 
795 003110 0632714 601000 BIT sOFFLINE, OTACS :0ID OFFLINE CLEAR? 
796 003114 0681401 BEQ TST6 338R IF YES 
797 063116 10408) ERROR i sOFFLINE 2 1 
798 FPSCSPSSHSHS HSS HSSESSSHHHHSSOOSOSSSSEOOOHEHSOHHEOTOEHSESOHEHOOROOS 
799 s*®TEST 6 TEST “OFFLINE® WHEN ORIVE IS EMPTY 
FS 


ll 





TAI’ MANUAL INTERVENTION TEST 


DZTACC NEW 


801 063126 
882 0603122 
803 063130 
804 003134 
80S 0603136 
806 9663140 
607 903144 
808 003146 
809 663150 
610 603154 
811 603160 
812 663162 


816 603164 
817 003166 
118 003174 
819 603200 
620 603202 
621 003204 
822 663210 
823 0603212 
624 0603214 
003220 
826 603222 


838 003224 
831 003226 
832 003234 


835 003242 
836 603244 
637 003246 
838 0603252 
839 003254 
840 003256 
641 003260 
842 003262 


844 003262 
845 603270 
846 003274 
647 0603276 
848 983302 
849 003304 
858 0603306 
851 903310 
852 003312 
853 003316 


—_ 


T6 


010314 
032714 
001401 
104001 


000004 
012767 
012767 


000005 
010314 
112714 
104412 
005714 
1¢0061 
104001 


012767 
412714 
104413 
112715 
005327 
000600 
003372 
104413 
052714 
104412 


012767 
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TEST OFFLINE’ WHEN DRIVE Is EMPTY 


003146 175756 
007436 


003212 175712 
007436 


001000 ° 


@00001 175732 
@03242 175726 


000017 


000006 000014 
000003 


000377 


0800006 600014 


3 3008800000 0000 080000006000 00000000000008000800000000800000000008 
TST6: SCOPE 


MOV 026,6LPADR 33SET SCOPE LOOP ADDRESS 
JSR RO, OOASKQUES 
MOFFLN sMESSAGE POINTER 
BR is 300 TEST 
JuP eeTstie sSKIP THIS TEST 
iss RESET sCLEAR THE WORLD 
oe MOV ORIVE, OTACS sSELECT DRIVE 
Bic SOFFLINE, @TACS sTRY TO CLEAR OFFLINE INDICATION 
BIT OOFFLINE, @TACS sTEST FOR *OFFLINE® 
BNe TST? s3BR IF “OFFLINE* Ss) 
ERROR 1 3 °OFFLINESS@ 
FF SSSSSHSSSSSKSHESHSSHSSSSSSCSHSCHSHOSOCHHSCHSHSHOGHSSHSSCSOSCSESOGED 
s@TEST 7 PUT DRIVE °ONLINE® 


3 300080000600 000000088608008880 08880 0E OSD OOOESEESOSSESSSOCEHOOEOS 
TST7s SscOPE 


MoV €28,$LPADR 39SET SCOPE LOOP ADDRESS 

JSR RO, OGASKQUES 

MTAPE 

BR is 300 TEST 

JMP oeTsTie sSKIP THIS TEST 
iss RESET 
28% MOV DRIVE, OTACS sSELECT ORIVE t 

BIT eOFFLINE, OTACS 18 DRIVE OFFLINE? 

BEQ TsTie 338R IF WO 

ERROR 1 sORIVE IS OFFLINE 
PR 
s@TEST 16 PUT DATA OW TAPE FOR WRITE LOCK TEST 


PPPHOPOTHERS TED OERESEOHESOSEEEHETDESS ETFO OREO EOHDOPOEHE SHOE HOHEED 
TST10s SCOPE 
MoV 61, STINES 3200 4 ITERATION 
MOV 818,8ESCAPE ssESCAPE TO 16 OW ERROR 
seeecogesecesesocecene 
sHANG IN THIS TEST UNTIL DATA I8 OW TAPE WITH HO ERRORS 


183 RESET rs 
mOV DRIVE, @TACS 
MOVB @REWIND!GO,@TACS . 
WAITREADY sWAIT OW READY 
Tst eTAcs sCHECK FOR ERROR 
BPL 26 
ERROR 1 s"ERROR® @ 1 
283 
sWRITE A BLOCK OF 6 BYTES 
MOV 66,658 sSETUP FOR 6 BYTES 
MOVB @WRITESGO,OTACS sSTART A WRITE 
6483 WAITXFER sWAIT ON TRANSFER REQUEST 
MOVB 6377,@TADB sLOAD DATA BUFFER 
DEC (PC)¢ sMORE TO DO? 
6583 r) sNUMBER OF BYTES TO WRITE GOES HERE 
BGT 646 s8R IF YES 
WAITXFER sWAIT ON TRANSER REQUEST 
BIs sILBS, @TACS sWRITE Cre 
WAITREADY sWAIT ON READY 
sWRITE A BLOCK OF 6 BYTES 
MOV 66,678 sSETUP FOR 6 BYTES 








H3 


.?) 
TAI1 MANUAL INTERVENTION TEST MAINDEC11DZTACeC MACY11 27(732) i1eJUN©76 13381 PAGE 21 SEQ 6034 
i) DZETACC NEW Tie PUT DATA ON TAPE FOR WRITE LOCK TEST 
856 603326 112714 000083 . MOVB OWRITELGO, OTACS sSTART A WRITE 
g 657 603332 104413 6663 WAITXFER sWAIT ON TRANSFER REQUEST 
656 003334 112715 600377 MOVB 6377, @0TADB sLOAD DATA BUFFER 
659 0683340 005327 DEC (PC)¢ sMORE TO DOT 
a 860 603342 900000 6783 ® sNUMBER OF BYTES TO WRITE GOES HERE 
661 803344 603372 BGT 668 38h IF YES 
862 603346 104413 WAITXFER sWAIT ON TRANSER REQUEST 
oS 863 8603350 652714 600026 Bis OILBS, @TACS sWRITE Cre 
864 8603354 104412 WAITREADY sWAIT ON READY 
865 0603356 112714 6009001 MOVB ewFGiGO,eTACS sWRITE A PILE GAP 
G 866 603362 104412 WAITREADY sWAIT OW *READY® 
867 sWRITE A BLOCK OF 6 BYTES 
668 0603364 6812767 8800006 600014 MOV 06,698 sSETUP FOR 6 BYTES 
eo 869 603372 112714 909003 mova OWRITELGO, OTACS sSTART A WRITE 
870 603376 1604413 6883 WAITXFER gWAIT OW TRANSFER REQUEST 
871 003400 112715 9006377 MOVB €377,@TADB sLOAD DATA BUFFER 
ec 672 0034604 605327 DEC (PC)¢ sMORE TO DOP 
873 003406 900000 6983 t) sNUMBER OF BYTES TO WRITE GOES HERE 
874 6803418 663372 BGT 66s g8r IF YES 
S 875 003412 104413 WAITXFER sWAIT ON TRANSER REQUEST 
876 663414 652714 680020 BIs oILBs,e@TACs s¥RITE Cac 
877 603420 104412 WAITREADY sWAIT OW READY 
ie) 676 PI CLOCHSS OSS SS HERVE TOSSES STFOSSEPHSTLG IIS GTV HE DOO GHSTIYYVSEOU BBO RDOS 
879 s@TEST 11 TEST “WRITE LOCK® WHEN AT CLEAR LEADER 
880 PPSOSOSSESSSCSTCSOSSHGHHSTSESSSHTDHFOHDGAGGSOOCHOGSFOSES HS CHOBESHOOHEOOED 
e 861 603422 800004 TSTiis SscCoOPE 
003424 0612767 809001 175534 MOV C1 -STINES 3300 4 ITERATION 
003432 012767 603462 175446 MOV 016,SLPADR s3SET SCOPE LOOP ADDRESS 3 
e 003440 012767 063772 175522 MOV OTSTI2,-SESCAPE ;7ESCAPE TO TEST 12 OW ERROR 
003446 004037 0607436 JSR RO, O@GASKQUES pHAVE OPERATOR SET “WRITE LOCK® 
003452 613621 MURTLK 
& 003454 6900492 BR is 300 TEST 
03456 600137 605716 JMP oeTst22. sSKIP WRITE LOCK TESTS 
003462 183 
eS 003462 900005 RESET ; sCLEAR ALL 
003464 0106314 MOV DRIVE, @TACS sSELECT DRIVE 
@03466 112714 0600017 MOVB @REWIND!GO,@TACS - GO TO *BOT® 
(3 003472 104412 WAITREADY 
003474 005714 TST eTacs 31S "CRROR® si 
603476 100001 BPL 28 s8R IF NO 
o 003500 104001 ERROR i 3 "ERROR" 81 
003502 032714 0620000 283 BIT @LEADER, @TACS sCHECK FOR CLEAR LEADER 
003506 0601001 BNE 38 s8R IF OW CLEAR LEADER 
© 003519 104001 ERROR i sREWIND DION’T GO TO BOT 
003512 363 
@03512 112714 see000 MOVB eurG,@TACS sLOAD A *wFG? 
@ 03516 032714 #10000 BIT sURTLOCK, OTACS 92S "WRITE LOCK ERROR® = °1° 
003522 0681001 BNE 646 sBR IF YES 
003524 104001 ERROR 4 s°WRITE LOCK ERROR® NOT EQUAL *°4° 
oS @03526 6463 
@03526 112714 600002 mova SWRITE,@OTACS sLOAD A *WRITE® 
003532 632714 #10000 BIT @WRTLOCK, @TACS 31S *WRITE LOCK ERROR® = "4" 
© 063536 0601001 ¥ BNE 658 :8R IF YES 
003540 104001 ERROR i s°WRITE LOCK ERROR® NOT EQUAL °1° 
003542 6583 
© @03542 112714 690004 MOVB @READ, OTACS sLOAD A *READ® 
2) 








i= 


Bs 
@®eoeoeeeee@ee#eeoeee#eee#e#steeeeese @ 
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DETACC .WEW Til TEST “WRITE LOCK® WHEN AT CLEAR LEADER 

912 003546 632714 e10000 BIT @WRTLOCK, OTACS p18 “WRITE LOCK ERROR® = “6° 

913 @03552 901401 BEQ 568 s0R IF YES 

914 003554 104001 ERROR 1 s°WRITE LOCK ERROR® HOT EQUAL °@* 

915 003556 668% 

916 903586 112714 eeeses NOVB #BSFG,e@TACS sLOAD A *BSFG* 

917 003562 632714 e1ece0 BIT @WRTLOCK, OTACS $18 °WRITE LOCK ERROR® © “0° 

918 603566 901401 BEQ 678 s0R IF YES 

919 ©03578 104001 ERROR 1 s°WRITE LOCK ERROR® NOT EQUAL °0* 

920 003572 6763 

921 @03572 112714 eeee1e MOVB  6888C,@TACS sLOAD A "BS8G* 

922 003576 632714 e10000 BIT @WRTLOCK, @TACS 318 °WRITE LOCK ERROR® = °6* 

923 603602 001401 BEO 658 sBR IF YES 

924 003604 104001 ERROR 1 s°WRITE LOCK ERROR® NOT EQUAL *e@* 

925 003606 608: 

926 003606 112714 00012 MNOVB © OSFFG, @TACS sLOAD A °SFFce 

927 003612 @32714 e10000 BIT SURTLOCK, @TACS $18 “WRITE LOCK ERROR® = “9° 

928 003616 001401 BEQ 698 sOR IF YES 

929 003620 104001 ERROR 1 s°WRITE LOCK ERROR® NOT EQUAL °@* 

938 003622 6961 

931 ©63622 112714 000014 MOVE 6SFBG,eTACS sLOAD A °SFBG" 

932 003626 032714 e100 BIT @WRTLOCK, OTACS 318 °WRITE LOCK ERROR® = "6° 

933 003632 001401 BEO 708 30R IF YES 

934 003634 104001 ERROR 1 s°WRITE LOCK ERROR® NOT EQUAL "6° 

935 003636 7081 

936 003636 112714 900016 MOVE @REWIND, OTACS sLOAD A *REWIND® 

937 693642 032714 #10000 BIT eWRTLOCK, @TACS $18 "WRITE LOCK ERROR® = °9* 

938 003646 901401 BEO 716 sBR IF YES 

939 083650 104001 ERROR 1 s°WRITE LOCK ERROR® NOT EQUAL °0* 

946 003652 718% 

941 003652 112714 @9e000 MOVE eWFG,@TACS sCHECK °ERROR® WITH °WFG® 

942 003656 905714 TST @TACS sSAMPLE THE °ERROR® BIT 

943 803660 100401 BMI 728 sBR IF °ERROR® @ 1 

944 003662 104001 ERROR 1 S"ERROR® NOT s 1 

945 003664 7283 

946 003664 112714 900002 HOVE sWRITE,@TACS sCHECK °ERROR® WITH °WRITE® 

947 003670 005714 TST @TACS sSAMPLE THE °ERROR® BIT 

948 003672 100401 BMI 7138 38R IF °ERROR® @ 1 

949 903674 104001 ERROR 1 s*ERROR® NOT @ 1 

950 903676 7383 : 

951 003676 112714 00004 MOVB @READ, @TACS sCHECK "ERROR® WITH °READ® 

952 603702 60:714 TST @TACS sSAMPLE THE °ERROR® BIT 

953 003704 100401 BMI 748 ;BR IF "ERROR® = 1 

954 003706 104001 ERROR 1 s"ERROR® NOT = 1 

955 903710 7483 

956 003710 112714 00006 MOVB eBSFG, @TACS :CHECK "ERROR® WITH °BSFG* 

957 003714 905714 TST eTACS SSAMPLE THE °ERROR® BIT 

958 003716 100401 ) BMI 758 3BR IF °ERROR® = 1 

959 003720 104001 ERROR 1 s°ERROR® WOT = 1 

960 003722 7581 

961 003722 112714 00010 MOVB 688BG,@TACS sCHECK "ERROR® WITH °BSBG* 

962 003726 905714 TST eTACS sSAMPLE THE °ERROR® BIT 

963 @03730 100401 BMY 768 3BR IF “ERROR® = 1 

964 003732 104001 ERROR 1 s*ERROR® NOT @ 1 

965 003734 7683 

966 @03734 112714 900012 MOVB © OSFFG, @TACS sCHECK °ERROR® WITH °SFFG* 

967 003740 005714 TST eTACS sSAMPLE THE "ERROR® BIT 

I3 











TAI] MANUAL INTERVENTION TEST 
DETACC NEW 


003742 
003744 
003746 
003746 
603752 
003754 
003756 
603760 
003766 
003764 
003766 
0037768 
003772 


003772 
003774 
004002 
004010 
004012 
004014 
004020 
004022 
004026 
004030 
094632 
604034 
004040 
004042 
604046 
004050 
064052 
004052 
004056 
004060 
604062 
004064 
004064 
004070 
004072 
004074 
084076 
004076 
004162 
004104 
004106 
004110 
004110 
004114 
004116 
064126 
004122 
004122 
004126 
004130 


Til 


100401 
104061 


112714 
oo0s714 
190401 
194001 


112714 
oos714 
100001 
104001 


112714 
005714 
100401 
104001 


112724 
005714 
100401 
104061 


112714 
005714 
100401 
164001 


112714 
005714 
100001 
104601 


112714 
005714 
100001 


004052 
004332 


000017 
060005 


000026 
040000 


MAINDEC $41 -DETAC eC 
TEST “WRITE LOCK® WHEN AT CLEAR LEADER 


175104 
175160 


7763 


7863 


7968 


BNI 778 
ERROR 1 
Move 0SF8G, OTACS 
TsT eTacs 
BMI 786 
ERROR 1 
te 
MOVE @REWIND, OTACS 
TST eracs 
BPL 796 
ERROR 1 
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BR IF “ERROR? © 1 
s°ERROR® BOT @ 1 


sCHECK “ERROR® WITH °SFBG* 
sSAMPLE THE "ERROR® BIT 
sR IF “ERROR® © i 
s°BRROR® HOT @ 1 


sCHECK "ERROR® WITH "REWIND? 
sSAMPLE THE "ERROR" BIT 

s8R IF *ERROR® @ 6 

s*ERROR® HOT c O 


FP SSSSSSSHOSKSHHTESSSSHHOSHOSOSSSHHSHSHHHOSHSHOHOSHSESGHSOHSGHOHOOS 


g@TEst 12 


TEST “WRITE LOCK® WITH °CRC ERROR® 


2 9 808080686 00088008 60680086080 80808 00008808808 08G F088 FSS EHOHEHO88 


TSTi2s 


6462 


6783 


SCoPE 
MoV 016, S6LPADR 


MOV OTSTI3S,CESCAPE s;ESCAPE TO TEST 13 OW ERROR 


sINIT, THE INTERFACE 


RESET 

MoV DRIVE, OTACS 
MOVB @REWIND!GO,OTACS 
WAITREADY 

MOvB @READ!GO, OTACS 
WAITXFER 

TSsTB OTADB 
WAITXPER 

BIs eILBs, OTACS 
WAITREADY 

Sit eCRCERR, OTACS 
BNE is 

ERROR 1 

MOVB ewrG, @TACE 
Tst eTacs 

BMI 648 

ERROR 1 

MOVB OWRITE, OTACS 
TST eTacs 

BMI 658 

ERROR 1 

MOVB @READ, OTACS 
TST eTacs 

BMI 668 

ERROR 1 

MOVB eBSFC,eTACS 
TST eTACcS 

BPL 676 

ERROR 1 

MOVB @BSBG, @TACS 
TST eTacs 

BPL 686 


sSELECT DRIVE 
360 TO 80T 
sWAIT OW READY 


sGET OVER FIRST SLOCK OF DATA 
sKNOCK DOWN °XFER REO* 


338 CRC ERROR FLAGSi? 


38R IF Yes 
340 CRC ERROR 


sCHECK "ERROR® WITH 
sSAMPLE THE "ERRCR® 
gBR IF °ERROR® & i 
s°ERROR® NOT @ i 


sCHECK “ERROR? WITH 
sSAMPLE THE *ERROR® 
28R IF “ERROR® @ 1 
s°ERROR® NOT @ 1 


sCHECK “ERROR? WITH 
sSAMPLE THE *ERROR® 
sBR IF °ERROR® = 1 
s*ERROR® NOT @ i 


sCHECK "ERROR® WITH 
sSAMPLE THE “ERROR® 
sBR IF “ERROR® & 6 

2°ERROR® NOT ss © 


sCHECK "ERROR® WITH 
gSAMPLE THE *ERROR® 
78R IF "ERROR® 8 @ 


*wrc® 
Sit 


*READ® 
BIT 


"8s8G" 
sit 





J3 








1024 
1025 
1026 
1027 
1028 
1629 
1039 
1031 
"9032 
1033 
1034 
1035 
1036 
1037 
1038 
1039 
1048 
1041 
1042 
1043 
1044 
1045 
1046 
1047 
1048 
1649 
1950 
1051 
1052 
1053 
1054 
1055 
1056 
1057 
1058 
1089 
1666 
1061 
1962 
1063 
1064 
1865 
1066 
1067 
1068 
1069 
1070 
1071 
107° 
1073 
1074 
1075 
1076 
1077 
1078 
1079 


004132 
004134 
064134 
004140 
004142 
004144 
004146 
004146 
004152 
004154 
004156 
6041668 
004168 
064164 
004166 
004176 
004172 
oo417° 
004176 
004202 
084204 
004206 
804206 
004212 
004216 
094226 
004222 
004222 
064226 
004232 
004234 


004236 


004236 
004242 
004246 
004250 
004252 
004252 
004256 
004262 
004264 
004266 
064266 
004272 
004276 
004300 
004302 
004302 
064306 
004312 
004314 
004316 
004316 
004322 
004326 
00433¢ 


TAI’ MANUAL INTERVENTION TEST  MAINDEC*11-DETAC-C 
DETACC NEW 


T1i2 
104063 


912714 
005714 


112714 
005714 
196001 
194001 


112714 


008714 


160001 
104001 


112714 
032714 
001601 
164001 


112714 
032714 
001001 
104001 


112714 
032714 
001401 
104601 


112714 
032714 
001401 
104001 


112714 
032714 
001401 
104001 


112714 
032714 
001461 
104601 


112714 
032714 
001401 
104001 


112714 
032714 
001401 
104001 


TEST “WRITE LOCK® WITH °CRC ERROR® 


ERROR 1 
686: } 
000012 MOVE «=: OSFFG, eTACS 
T8T eracs 
BPL 638 
ERROR 1 
6968 
eects MOVB 98F8G,eTACS 
T8T eTacs 
. BPL 706 
ERROR 1 
7083 
060016 MOVE REWIND, @TACS 
TST eTacs 
BPL 718 
ERROR 1 
7168 
e2e000 MOVE «=: @WFG, OTACS 
010000 BIT OWRTLOCK, OTACS 
BEE 726 
ERROR 1 
7283 
eeeasz MOVE eWRITE,@TACS 
819000 ' pit eWRTLOCK, OTACS 
BNE 738 
ERROR 1 
7388 
000084 MOVE READ, @TACS 
010000 BIT @WRTLOCK, OTACS 
BEQ 748 
ERROR 1 
7468 
869006 MOVE eBSFG,eTACS 
610000 BIT @WRTLOCK, @TACS 
BEQ 758 
ERROR 1 
.7583 
eoee1e MOVE  9BSBG, eTACS. 
010000 - BIT @WRTLOCK, @TACS 
BEOQ 768° 
ERROR 1 
7663 
000012 MOVE eSFFG,eTACS 
010000 BIT @WRTLOCK, @TACS 
BEO 778 
ERROR 1 
7768 
000014 MOVE ¢SFBG,eTACS 
019000 BIT SWRTLOCK, OTACS 
BEO 768 
ERROR 1 
7863 
000016 MOVB @REWIND,OTACS 
010080 BIT @WRTLOCK, @TACS 
© BEQ 798 
ERROR 1 
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' 1 ¢ 
> b> . ’ "¢ 
a 


“ 


SEQ 6037 


e"ERROR® HOT & @ 


sCHECK "ERROR® WITH *srFG* 
SSAMPLE THE °ERROR® BIT 
9BR IF "ERROR® @ 6 

3 °ERROR® NOT s 6 


gCHECK "ERROR® WITH *“srBG* 
gSAMPLE THE “ERROR® BIT 
sR IF "ERROR® @ @ 
s"ERROR® HOT w OC 


sCHECK °ERROR® WITH °REWIND® 
sSAMPLE THE °ERROR® BIT 

sBR If “ERROR? & 6 

s°ERROR® NOT cs 6 


sLOAD A *wrce 

sI8 “WRITE LOCK ERROR® & °3° 

30R IF YES 

s*WRITE LOCK ERROR® HOT EQUAL °1° 


sLOAD A *WRITE® 

316 “WRITE LOCK ERROR® @ °4° ‘ 
sBR IF YES 

s°WRITE LOCK ERROR® HOT EQUAL °1° 


sLOAD A *READ® 

IS “WRITE LOCK ERROR? = “9° 

s8R IF YES 

s°WRITE LOCK ERROR® NOT EQUAL *6* 


sLOAD A *B8FG" 

33S “WRITE LOCK ERROR® = "9° 

s8rn IF YES 

s°WREITE LOCK ERROR® NOT EQUAL *@*° 


sLOAD A *88BG*" 

318 “WRITE LOCK ERROR® = °6* 

s0r IF YES 

s°WRITE LOCK ERROR® BOT EQUAL "O° 


sLOAD A *SFFG* 

918 °WRITE LOCK ERROR" =& °9* 

s8R IF YES 

s°WRITE LOCK ERROR® NOT EQUAL *@* 


sLOAD A *SFBG* 

#18 *°WRITE LOCK ERROR® @& °O° 

sBR IF YES 

s°WRITE LOCK ERROR® NOT EQUAL *O* 


sLOAD A *REWIND® 

318 "WRITE LOCK ERROR® & *9* 

sBR IF YES 

s*WRITE LOCK ERROR® NOT EQUAL *6* 


K3 


ad 





TAI MANUAL INTERVENTION TEST 


DZTACC NEW 


1680 
1061 
1082 
1083 
1064 
1085 
1006 
1087 
1086 
1089 
1696 
1091 
1092 
1093 
1094 
1095 
1096 
1097 
1698 
1099 
11008 
1101 
11062 
1103 
1104 
1105 
1106 
1107 
1108 
1109 
1116 
iat 
1112 
1113 
1114 
1135 
1116 
1117 
1118 
1119 
1120 
1121 
1122 
1123 
1124 
1125 
1126 
1127 
1128 
1129 
1130 
1131 
1132 
1133 
1134 
1135 





Ti2 


000004 
012767 
012767 
o0eees 
010314 
032714 
001401 
104061 


112714 
032714 
001601 
104001 


112714 
032714 
001001 
104001 


112714 
032714 
001401 
104601 


112714 
632714 
001401 
104001 


112714 
032714 
001401 
104001 


112714 
032714 
001401 
104001 


112714 
032714 
001401 
194001 


112714 
032714 
001401 
104901 


112714 
605714 
100401 


004364 


MAINDEC $11 eDZTACoC 


TEST “WRITE LOCK® WITH "CRC ERROR® 


174544 
004644 174620 


667000 


000004 
010000 


000014 
010000 


om 
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7988 
PF PSSSSSHHSHHSSHSHSESHOHHHAOSHHHHSHHHSEHHHSHOSHHOSSSEHOOCOOTHOOSOOS 
s*TEST 13 TEST “WRITE LOCK® WITHOUT ANY ERRORS 
J FOSSSHSSSHHESHSSESSSSHSHHOHHEHSSHHHHSHSOHHSHHHHHHSOHOHSHOEHOSOCD 
TET13: SCOPE 

MOV 618, 6LPADR 39SET SCOPE LOOP ADDRESS 

aan OTST14,GESCAPE ;7ESCAPE TO TEST 14 OW ERROR 

RESET 

NOV DRIVE, OTACS SELECT ORIVE 

BIT SCRCERR! LEADER FGAP! TINERR| OFFLINE, OTACS sCHECK STATUS 

BEQ is s8R IF OK TO TEST “WRITE LOCK? 

ERROR i sTAPE ISN°T POSITIONED PROPERLY 
183 

MOVB @WFG, OTACS sLOAD A °urFG* 

Bit GWRTLOCK, OTACS $38 °WRITE LOCK ERROR® @ °3° 

BNE 648 s8n IF YES 

ERROR 1 s°WRITE LOCK ERROR® WOT EQUAL °1° 
6483 

MOVB OWRITE, OTACS sLOAD A gd 

BIT OWRTLOCK, OTACS $18 °WRITE K ERROR® @ °4° 

BNE oss s8R IF YES ° 

ERROR 1 s"WRITE LOCK ERROR® NOT EQUAL *°1° 
6563 

MOVB @READ, OTACS sLOAD A *READ* 

BIT @WRTLOCK, OTACS 316 “WRITE LOCK ERROR® « *9* 

BEQ 668 s0Rn IF YES 

ERROR 1 s*WRITE LOCK ERROR® KOT EQUAL "9" 
6683 ; 

MOVB eBSFC,OTACS sLOAD A *BSFG* 

BIT OWURTLOCK, @TACS 318 WRITE LOCK ERROR® & “9° 

BEQ 678 OR IF YES 

ERROR 1 s°WRITE LOCK ERROR® NOT EQUAL "6" 
6783 

’ MOVB 0B8BG, OTACS sLOAD A *BSBG* 

BIT @WRTLOCK, OTACS 318 "WRITE LOCK ERROR® s *e° 

BEG 68s sBe IF YES 

ERROR 1 s"WRITE LOCK ERROR® NOT EQUAL "6° 
6683 

MOVB OSFFG,OTACS sLOAD A “SFFG* 

BIT @WRTLOCK, OTACS 318 “WRITE LOCK ERROR® = °9*" 

BEQ 696 BR IF YES 

ERROR 1 s°WRITE LOCK ERROR® HOT EQUAL *6* 
6983 

MOvB OSFBG, OTACS sLOAD A “SFBG* 

BIT @WRTLOCK, OTACS 31S “WRITE LOCK ERROR® = *9* 

BEG 708 s8R IF YES 

ERROR 1 s*WRITE LOCK ERROR® NOT EQUAL "e* 
706% 

MOVB SREWIND, OTACS sLOAD A *REWIND® 

BIT @WRTLOCK, @TACE $18 “WRITE LOCK ERROR® @ *9* 

BEQ 718 3sBR IF YES 

ERROR 1 p°WRITE LOCK ERROR® NOT EQUAL *6° 
7183 

MOVB ewrG, OTACS sCHECK *°ERROR® WITH °WFG® 

TST e@eTACS sSAMPLE THE °ERROR® BIT 

BMI 728 78R IF “ERROR® @ 1 

L3 


ners a a LN 


— | 


DZTACC NEW 


1136 004534 
1137 0604536 
1138 604536 
1139 664542 
1146 004544 
1141 604546 
1142 064556 
1143 004550 
1144 004554 
1145 004556 
1146 0045608 
1147 604562 
1148 604562 
1149 0604566 
1156 604576 
1151 004572 
1152 004574 
1153 004574 
1154 004600 
1155 0604602 
1156 004604 
1157 004606 
1158 0664606 
1159 004612 
1160 004614 
1161 604616 
1162 0604620 
1163 004620 
1164 604624 
1165 0604626 
1166 004630 
1467 004632 
1168 0664632 
1169 004636 
1170 004640 
1171 604642 
1172 004644 
1173 
1174 
1175 
1176 
1177 
1178 
1179 
1180 
1161 
11862 
1163 
1184 
1165 
1186 
1187 
1168 
11869 
1198 
1191 


004644 
004646 
004654 
004662 
004664 
004666 
004672 
004674 
294760 
0047062 
004706 
004710 
004714 
004716 
004722 
004724 


112714 
005714 
160401 
164001 


112714 
005714 
1600061 
164001 


112714 
005714 
100061 
164001 


112714 
005714 
100001 
104001 


1127.4 
005714 
100001 
164001 


112714 
005714 
100001 
104001 


112714 
005714 
100001 
164001 


000004 
012767 
012767 
000005 
610314 
112714 
104412 
£12714 
104413 
052714 
104412 
112714 
164412 
032714 
001001 
104001 


TAI1 MANUAL INTERVENTION TEST 
TEST “WRITE LOCK® WITHOUT ANY ERRORS 


000014 


004726 
005206 


600017 
000005 
090020 


000013 
004000 


MAINDEC©11-DZTAC oC 


174232 
174306 
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. ERROR i s"ERROR® WOT @ i 
283 
MOVB @QURITE, @TACS sCHECK "ERROR® WITH "WRITE? 
TST @TACS sSAMPLE THE "ERROR® BIT 
BMI 738 sBR IF "ERROR® @ 1 
ERROR 4 s"ERROR® NOT @ 1 
7363 < ‘ 
MOVB @READ, @TACS sCHECK "ERROR® WITH *READ® 
TST @TACcSs gSAMPLE THE °ERROR® BIT 
BPL 748 s0R IF °ERROR® = 6 
ERROR 4 s°ERROR® NOT os O 
7463 
MOVB eBSFG,OTACS sCHECK "ERROR® WITH *BSFG* 
TST eTacs sSAMPLE THE *°ERROR® BIT 
BPL 786 s8R IF "ERROR® = @ 
. ERROR 4 s°ERROR® NOT so O 
58s 
MOVB 8BSBG, @TACS sCHECK "ERROR® WITH *BSBG* 
TST @TACS sSAMPLE THE "ERROR® BIT 
BPL 768 s8R IF *°ERROR® & 6 
ERROR i s°ERROR® NOT so @ 
7683 
MOVB OSFFG,@TACS sCHECK "ERROR® WITH "SFFG* 
TST @TACS sSAMPLE THE "ERROR® BIT 
BPL 778 ;8R IF "ERROR® = O 
a ERROR a s*°ERROR® NOT os @ 
7763 
MOVB @SFBG,eTACS sCHECK "ERROR® WITH *SFBG* 
TsTt eTacs gSAMPLE THE "ERROR® BIT 
BPL 7866 78R IF °ERROR® = 6 
ERROR i s"°ERROR® NOT 2 @ 
768% 
MOVB @REWIND, OTACS sCHECK "ERROR® WITH *REWIND® 
TST e@TACS SAMPLE THE *°ERROR® BIT 
BPL 798 s8R IF "°ERROR® & @ 
ERROR 4 2"°ERROR® NOT s © 
7983 
LEP OPEHS SOE SHR EROS TSH ETAT ETE SEE O OTOH HFOTSOTES OEP OOTEHHOOEL FRR RH 
s*TEST 14 TEST “WRITE LOCK® WITH FILE GAP#si 
5 [ROH OEEHSEE OE DEHE LTO DTEREEOHO THE EH RETO STEOOHDHEHYOERERPAEDEREROD 
TST143: SCOPE 
MOV €18,6LPADR 93SET SCOPE LOOP ADDRESS 
MOY @TSTIS,SESCAPE 3;ESCAPE TO TEST 15 ON ERROR 
RESET sCLEAR THE INTERFACE 
MOV DRIVE, @TACS sSELECT @TACS 
MOVB @REWIND!GO,@TACS 
WAITREADY " 
MOVB @READ!GO,@TACS sSTART A READ 
WAITXFER 
BIS @¢ILBs,@TACS 3SHUT DOWN 
WAITREADY 
MOVB @SFFGIGO,®@TACS 3GO TO THE FILE GAP 
WAITREADY sWAIT ON "READY" 
BIT eFGAP,@TACS sCHECK FOR FILE GAP 
BNE is 78R If IN A GAP re 
ERROR 1 sFILE GAP & © 
m2 





€3 


1192 
1193 
1194 
1195 
1196 
1197 
1198 
1199 
1200 
1201 
1202 
1203 
1204 
1205 
1206 
1207 
1208 
1209 
1210 
1211 
1212 
1213 
1214 
1215 
1216 
1217 
1218 
1219 
1220 
1221 
1222 
1223 
1224 
1225 
1226 
1227 
1228 
1229 
1230 
1231 
1232 
i233 
1234 
1235 
1236 
1237 
1238 
1239 
1240 
1241 
1242 
1243 
1244 
1245 
1246 
1247 


004726 
004726 
004732 
004736 
004740 
004742 
004742 
004746 
664752 
604754 
004756 
004756 
004762 
004766 
004770 
004772 
604772 
004776 
005802 
005004 
005006 
005006 
005012 
665016 
005020 
005022 
605022 
005026 
605032 
005034 
805036 
605036 
605042 
005046 
605050 
005052 
805052 
605056 
005062 
005064 
005066 
605066 
005072 
005074 
095076 
005100 
605100 
005-104 
005106 
605110 
0051 4 
005112 
005116 
605120 
005122 
405124 


Ti4 


112714 
032714 
001001 
164001 


112714 
032714 
601001 
104601 


112714 
032714 
001401 
104001 


112714 
032714 
001401 
164001 


112714 
632714 
001401 
104001 


112714 
032714 
001401 
104001 


112714 
032714 
001401 
104001 


112714 
032714 
001401 
104001 


112714 
005714 
100401 
104601 


112714 
905714 
100401 
104901 


112714 
005714 
190401 
104001 


4, 


TA11 MANUAL INTERVENTION TEST 
DZTACC NEW 


060002 
010900 


000004 
018000 


090006 
010000 


060010 
010000 


000014 
010000 


010000 


000004 


MAINDEC 11 eDZTAC eC 
TEST "WRITE LOCK® WITH FILE GAPsi 


6483 


678% 


7083 


7183 


7283 


738% 


7483: 


MOVB 
BIT 
BNE 
ERROR 


MOVB 
BIT 
BNE 
ERROR 


MOVB 
BIT 
BEQ 
ERROR 


MOVB 
BIT 
BEQ 
ERROR 


MOVB 
BIT 
BEQ 
ERROR 


MOVB 
BIT 
BEQ 
ERROR 


MOVB 
BIT 
BEQ 
ERROR 


MOVB 
BIT 
BEO 
ERROR 


MOVB 
TST 
BMI 
ERROR 


MOVB 
TST 
BMI 
ERROR 


MOVB 
TST 
BMI 
ERROR 


MACY11 27(732) 


eWFG,@TACS 
@WRTLOCK, @TACS 
648 

i 


OWRITE,@TACS 
@WRTLOCK, @TACS 
658 

i 


@READ, @TACS 
@WRTLOCK, @TACS 
668 

a 


sBSFG,@TACS 
@WRTLOCK, ®TACS 
678 

1 


@BSBG,@TACS 
@WRTLOCK,@TACS 
68s 

i 


@SFFG,@TACS 
sWRTLOCK,@TACS 
698 

i 


@SFBG,@TACS 
eWRTLOCK, @TACS 
706 

i 


@REWIND,@TACS 
@eWRTLOCK, @TACS 
718 

i 


eWFG,@TACS 
eTACS 

728 

i 


@WRITE,@TACS 
e@eTACS 

738 

i 


@READ, @TACS 
eTACS 

746 

i 
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sLOAD A *wrG* 

s1S “WRITE LOCK ERROR® @ °° 
s5R IF YES 

s"WRITE LOCK ERROR" NOT EQUAL 


LOAD A *WRITE® 

318 “WRITE LOCK ERROR® s& *1* 
78R IF YES 

s"WRITE LOCK ERROR® NOT EQUAL 


sLOAD A *READ* 

318 “WRITE LOCK ERROR" & "0° 
;BR IF YES 

s*WRITE LOCK ERROR® NOT EQUAL 


#LOAD A *BSFG* 

31S “WRITE LOCK ERROR® = "6° 
s8R IF YES 

s"WRITE LOCK ERROR® NOT EQUAL 


sLOAD A "8S8G*" 

31S “WRITE LOCK ERROR® = "6" 
s8R IF YES 

s*WRITE LOCK ERROR® NOT EQUAL 


sLOAD A *SFFG* 

318 “WRITE LOCK ERROR® = "9° 
38R IF YES 

s"WRITE LOCK ERROR® NOT EQUAL 


sLOAD A "SFBG" 

31S "WRITE LOCK ERROR® = *"6* 
7BR IF YES 

;"WRITE LO” ~. ERROR® NOT EQUAL 


sLOAD A *REWIND® 

31S "WRITE LOCK ERROR® = "9" 
3BR IF YES 

s"WRITE LOCK ERROR® NOT EQUAL 


sCHECK "ERROR® WITH °WFG*® 
sSAMPLE THE "ERROR® BIT 
78R IF "ERROR® @ i 
s"ERROR® NOT @ 1 


sCHECK "ERROR® WITH "WRITE® 
sSAMPLE THE *ERROR® BIT 

;8R IF "ERROR® & 1 

s"ERROR® NOT @ 1 


9CHECK “ERROR® WITH "READ® 
sSAMPLE THE *ERROR® BIT 
3BR IF “ERROR® # 1 
s"ERROR® NOT 2 1 


age 


AY 
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DZTACC NEW T14 TEST “WRITE LOCK® WITH FILE GAPsi 
1246 005124 112714 #900006 wOVB oBSFG,eOTACS sCHECK °ERROR® With "BSFG* 
1249 605130 905714 st @TAcs sSANPLE THE "ERROR? BIT 
12586 ©605132 100001 BPL 756 gOR IF *ERROR® @ 6 
1251 005134 104001 ERROR 1 s*ERROR® HOT @ 6 
1252 005136 758% 
1253 605136 112714 #08810 MOvVB e868BG, OTACS sCHECK °ERROR® WITH "B8SBG* 
1254 905142 065714 TST OTACS gSAMPLE THE °ERROR® BIT 
1258S 905144 100001 BPL 768 sBR IF "ERROR® «2 
1256 005146 104001 ERROR 1 s°ERROR® HOT o 8 
1257 #05150 7683 : 
1286 605159 112714 600012 MOVB OSFrG, OTACS pCHECK °ERROR® WITH “SFFCG* 
1259 605154 605714 TST @Tacs sSAMPLE THE "ERROR® BIT 
1260 065156 100001 BPL 778 sBR IF "ERROR® & 
1261 9605160 184001 ERROR i s*ERROR® HOT o 6 
1262 065162 7763 
1263 905162 112714 990014 MOVB OSF3G, OTACS sCHECK "ERROR® WITH °SFBG* 
1264 0805166 605714 T8T eTACcs gSAMPLE THE °ERROR® BIT 
1265 605170 100401 BMY 766 sBR IF *ERROR® @ 1 
1266 605172 104001 ERROR i s*ERROR® HOT @ 1 
1267 005174 7863 
1268 005174 112714 900016 MOVB @REWIND, OTACS sCHECK °ERROR® WITH “REWIND? 
1269 ©05200 0905714 TsT oracs sSAMPLE THE °ERROR® BIT 
1278 ©06605202 109001 BPL 798 s8R IF "ERROR? @ O 
1271 0605204 104001 ERROR 1 s°ERROR® NOT = @ 
1272 605206 7968 
1273 FPSSCECGESOSC EGS OSTEO DUE DOGOFIE SO HPVIOOS GHBEGECOSFISOFEIHOTFOLEHOGHDO 
1274 s*®TEST 15 TRY WRITING OW TAPE WHEN “WRITE LOCKED*® 
1275 LP SSHSOOFHGEEEGFSOOSIGESGHTHGE GOOG OHOGOTFOOST OS HOT COS HOHOEIHHHSHAHOD 
1276 005206 900004 TSTiS: SCOPE 
1277 605218 012767 #900001 173750 mov 01, STINES 3900 1 ITERATION 
1278 005216 612767 ©05266 173662 MOV 036,8LPADR 33SET SCOPE LOOP ADDRESS 
1279 605224 612767 005362 173736 MOV OTSTIG,SESCAPE 3;;ESCAPE TO TEST 16 ON ERROR 
1280 005232 see0eS RESET sCLEAP ALL 
12861 905234 0610314 MoV DRIVE, OTACS sSELECT DRIVE 
1262 005236 112714 900017 MOVB @REWIND!GO,@TACS 360 T0 BOT 
1283 ©@05242 104412 WAITREADY sWAIT ON READY FLAG 
1284 605244 112714 #98605 183 MOVB @READIGO, OTACS sSTART A READ 
1285 905250 1604413 WAITXFER sWAIT OW °XFER REO® 
1286 605252 0652714 900020 BIs OILBS, OTACS sSHUT DOWN 
1287 005256 104412 WAITREADY sWAIT OW READY 
1208 005260 112714 600015 MOVB @8F8G1G0,eTACS sSPACE OVER THE 24D BLOCK 
1269 005264 104412 WAITREADY sWAIT OW READY FLAG 
1298 005266 #8090005 363 RESET sCLEAR ALL FLAGS 
1291 ©05278 010314 MOV ORIVE,@TACS sSELECT DRIVE 
1292 ©05272 104412 WAITREADY gWAIT ON READY 
1293 ©05274 112714 6009003 MOVvB @WURITELGO,@TACS sSTART A *URITE® 
1294 065308 905001 CLR Ri sTIMER 
1295 005302 105201 abe INCcB Ri sCOUNT THE COUNTER GIVING 
1296 665304 001376 BNE 48 ] *"XFER REQ* TIME TO SET IF IT 
1297 3 IS GOING TO 
1298 005306 105714 TSTB eTacs sCHECK °XFER REOQ® 
1299 605318 169001 BPL 58 sOR IF If OLDN°T SET 
1306 0605312 104001 ERROR i s*XFER REQ® SET 
1301 @05314 104412 583 WAITREADY sWAIT OW READY 
1302 005316 605714 TST eTACS sCHECK ERROR FLAG 
1303 005320 100461 BMI 66 sn IF If IS SET 


—$—$—$_$_$_$_ $$ ET 


TA11 MANUAL INTERVENTION TEST 
DZTACC .WEW 


1304 
1305 
1306 
1307 
1308 
1309 
1310 
1311 
1312 
1313 
1314 
1315 
1316 
1317 
1318 
1319 
1320 
1321 
132? 
1323 
1324 
1325 
1326 
1327 
1328 
1329 
1330 
1331 
1332 
1333 
1334 
1335 
1336 
1337 
1338 
1339 
1346 
1341 
1342 
1343 
1344 
1345 
1346 
1347 
1348 
1349 
1350 
1351 
1352 
1353 
1354 
1355 
1356 
1357 
1358 
1359 


005322 
005324 
005336 
005332 
005336 
005342 
005344 
005 346 
005350 
005354 
005356 
005360 


Tis 


104061 
112714 
104412 
012701 
112714 
005301 
002405 
104413 
o52714 
104412 
000767 
104412 


104413 


052714 
104412 


000004 
012767 
Oi2zie! 
012767 
000005 
010314 
104412 
112714 
104412 


MAINDEC $11 -DETAC@C 


TRY WRITING OW TAPE WHEN “WRITE LOCKED*® 


000017 


000001 
005500 
000017 
000005 
000020 


000001 
000017 
000005 
0080206 
000005 


’ 


600001 
005532 
005564 


000017 


173574 
1735708 


173456 
173370 
173444 








MACY11 274732) {1eJUN@-76 13551 PAGE 29 8EQ 0042 
ERROR 1 sERROR I8N°T SET 
68: MOVE @REWIND1GO, OTACS 360 TO BOT 
WAITREADY sWAIT OW READY FLAG 
NOV 62,R1 sGET OVER THE TWO DATA BLOCKS 
788 MOVB @READ1GO, OTACS #START A READ 
oec Bi sCOUNT THIS BLOCK 
BLT ha g8R IF OVER THE 28D BLOCK? 
WAITXFER sWAIT OW °XFER REO® 
RYS 6IL8s8,eTACS SHUT DOWN 
WAITREADY sWAIT OW READY 
BP 78 360 DO ANOTHER SLOCK 
@te WAITREADY sIF °XFER REQ*® COMES UP THERE 
’ IS WORE THAN TWO BLOCKS ON TAPE 
5 *WRITE® CAUSED DATA TO BE WRITTEN ON TAP 
FF SSCOSSSSSHOSSHSSHHHSHSHHSHHHSHHSHHHHHHHSHHHHOHSHHSSHSSHHESOCHOHCOOOS 
s°TEST 16 TRY “WFG*® WHEN WRITE LOCKED 
FPFPSOCHSGSPIGFSSSOGHGGFSE SSE HIST SPSS GSCHSVOSHBISTGOHOSSHGHES VTHHOSHCHSSHHHOHSOO 
TSTi6: SCOPE 
MOV 01, 6TINES 3300 1 ITERATION 
nov eTST17,SESCAPE ;;ESCAPE TO TEST 17 OW ERROR 
RESET 
MOV DRIVE, @OTACS sSELECT DRIVE 
MOVB @REWIND!IGO,@TACS 360 f0 BOT 
WAITREADY sWAIT OW READY 
nOVB @READ!GO,e@TACS sGET PAST THE FIRST BLOCK 
WAITXFER sWAIT OW TRANSFER REQ, 
Bis eILBS, OTACS SHUT DOWN 
WAITREADY sWAIT OW READY 
RESET sCLEAR THE WORLD 
MOV ORIVE, @TACS gSELECT DRIVE 
WAITREADY sWAIT ON THE READY FLAG 
“ove @WFGIGO,eTACS sSTART A *urGe 
WAITREADY sWAIT OW READY 
MOVB @REWIND!GO,@TACS 360 TO BOT * 
WAITREADY ' 
MOVB @READ!GO,@TACS 9GET PAST 18ST BLOCK 
WAITXFER 
BIs sILBS, @TACS ;SHUT DOWN 
WAITREADY 
MOVE @READIGO, @TACS SEE IF 24D BLOCK I8 STILL OW TAPE 
WAITXFER 3I1f READY COMES UP THE *wrcG* 
9 COMMAND WROTE OW THE TAPE 
Bis eILBs, @TACS ;SHUT DOWN 
WAITREADY sWAIT OW READY 
FP SSSSSSSSSHSSHHSHSSHSHSHSSHHSSSHSSSSHCHSHSSHSHSSHSHOHSHSSHSHSSHSHSHCHHHOOSS 
s@TEST 17 TEST °WFG* ON CLEAR LEADER AND WRITE LOCKED 
33 HORSE EPSESHETSSEE OS VDSS HSHHSSVPRSHDHV HHS SSS SOS HHS SHS SST IOSSHHHISBEOHTSE 
TST17: SsCOPE 
MOV @1,6TIMES 3700 1 ITERATION 
MOV €16,SLPADR 39SET SCOPE LOOP ADDRESS 
MOV @TST20,SESCAPE ;;ESCAPE TO TEST 20 OW ERROR 
RESET 
“ov DRIVE, @TACS sSELECT DRIVE 
WAITREADY sWAIT ON THE READY FLAG 
18% MOVB @REWIND!GO, @TACS 360 TO BOT 
WAITREADY 
cy 





g 
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sSTART A °wrG? 

sWAIT FOR READY 

sCHECK ERROR 

s8n If ERRORS, a 
sERROR IEN°T OW AN ONE 

sCHECK IF STILL OW CLEAR LEADER 


33G0 TO THE NEXT TEST IF IT 18 


s4OT OW CLEAR LEADER 


FF OSHSSSSHSSSSHSESHHSHSHSSHSHSHOHHCHSHSSHSSHHOSESSOSHSCOSSSOESEOORS 


TEST “WRITE® WITH WRITE LOCK ON AND AT CLEAR LEADER 


FP SSOSSHSHSSHSHSSSHSSHHHHOHSSSOHHHSHEHOHSHOSSOSHOSSHSSSHOCOCHSSOSEOR 


3300 1 ITERATION 
39S8ET SCOPE LOOP ADDRESS 
ssESCAPE TO TEST 21 OW ERROR 


sCLEAR THE WORLD 

sSELECT THE DRIVE 

sWAIT ON READY 

360 TO BOT 

sWAIT TILL READY © 1 

sTRY TO START A WRITE . 

sIF TRANSFER REG, COKES UP 

sTHERE I8 A PROBLEM WITH WRITE LOCK 
sMAKE SURE STILL A CLEAR LEADER 


3388 IF AT CLEAR LEADER 


sTAPE MOVED OFF OF CLEAR LEADER 


FP SSCSSCHSSSSSHSHSSSSSCHHHHHHSHSSSHSHHSEHSHSHHHHHSHHHSSHHSHHSHOHHOHCOOS 


F FSSSSSSSHSSHSHSSHHSTHSESHSSSSHSHSHHHSSSSHSHHSHHOSEHSSSHSGCCOSCHRE 


3300 10, ITERATIONS 
39SET SCOPE LOOP ADDRESS 


sLOAD A *WFG* COMMAND 
sMAKE SURE THE CASSETTE IS 
*WRITE ENABLED® AND °OW LINE® 


33D0 1 ITERATION 


sSELECT DRIVE 


° 
TAIL MANUAL INTERVENTION TEST MAINDEC$11-DZTAC-C MACYI1 27(732) 
® DETACC .WEW T17 TEST °WFG* ON CLEAR LEADER AWD WRITE LOCKED 
1360 @0554@ 112714 00001 MOV — 9¥FGIGO,eTACS 
@ 1361 905844 104412 WAITREADY 
1362 @05546 905714 18 eTACS 
1363 @0SSSe@ 100401 BML 26 
e 1364 @8S3S2 104001 ERROR 1 
1365 605554 932714 e20000 263 BIT OLEADER, OTACS 
1366 985560 601001 ane 18720 
Q 1367 @05S62 104001 ERROR 1 
1368 
1369 s®TEST 20 
@ 1370 
1371 @0SS64 e9ese4 TST201 SCOPE 
1372 @05566 612767 @00001 173372 MOV 01, STINES 
fe 1373 @05S74 12767 05610 173304 MOV 18, S8LPADR 
1374 ©05602 612767 05642 173360 MOV 0TST21, SESCAPE 
1375 905618 seeees 18s RESET 
© 1376 @05612 610314 MOV DRIVE, OTACS 
1377 005614 104412 WAITREADY 
1378 605616 112714 00017 MOVB §SREWIND!GO,e@TACS 
Q 1379 05622 104412 WAITREADY 
1380 @05624 112714 00003 MOVE eWRITEGO,@TACS 
1381 005630 104412 WAITREADY 
9 1362 
1383 @05632 032714 20000 BIT @LEADER, @TACS 
1304 605636 001001 BNE 78721 
OQ 1385 @0S640 104001 ERROR 1 
1386 
1367 s@TEST 21 TEST “WRITE EWABLE® 
@ 1368 
1369 005642 890004 T8T215 SCOPE 
1390 @05644 12767 @00012 173314 MOV 010,,STIMES 
Q 1391 905652 612767 05670 173226 mov 918, 8LPADR 
1392 605660 604037 007436 JSR RO, OFASKQUES 
1393 605664 013040 MLAST 
@ 1394 985666 090240 NoP 
1395 605676 e8900es 183 RESET 
1396 005672 010314 MOV DRIVE, @TACS 
a 1397 @05674 112714 000017 MOVB = sREWIND!GO,e@TACS 
1398 905700 104412 WAITREADY 
1399 05702 112714 ee0000 MOVB © 9WFG,@TACS 
° 1400 005706 032714 011000 BIT @WRTLOCK | OFFLINE, @TACS 
1401 05712 001401 BEQ 18122 +8 
1402 005714 104001 ERROR 1 
© 1403 
1404 s®TEST 22 END OF TEST CODE 
1405 
a 1496 905716 900004 TST22 SCOPE 
1407 805726 012767 00001 173240 MOV #1, STIMES 
1408 005726 890005 RESET 
& 1409 005730 010314 MOV DRIVE, @TACS 
141@ 05732 112714 00017 MOVB = sREWIND!GO,@TACS 
1411 605736 104412 WAITREADY 
eo 1412 -SOTTL END OF PASS ROUTINE 
1413 . 
1414 
Q 1415 S@INCREMENT THE PASS NUMBER ($PASS) 


| W 





1416 
1417 
1418 
1419 
1420 
142% 
1422 
1473 
1424 
1425 
1426 
1427 
1428 
1429 
1430 
1431 
1432 
1433 
1434 
1435 
1436 
1437 
1438 
1439 
1446 
1441 
1442 
1443 
1444 
1445 
1446 
1447 


TAI1 MANUAL INTERVENTION TEST 
OZTACC ,WEW 


—_—_—$_—$—$—$—$—$—— SS Au 


END OF PASS ROUTINE 


173134 
173214 
173122 
100808 173114 


377 000 
042412 0642116 
051501 000123 


MAINDEC $4 1 -DETAC oS 
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s@TYPE “END PASS* 

s@IF THERES A MONITOR GO TO IT 

s@IF THERE ISN°T JUMP TO START 

s@IF IT IS DESIRED TO HAVE A BELL INDICATE THE °END OF PASS* LOCATION 
s@SENDMG CAN BE CHANGED TO 7, 


SEOP: 
SCOPE 
CLR aTSTEM seZER0 THE TEST HUMBER 
CUR STIMES ssZERO THE WUMBER OF ITERATIONS 
Inc ePAss seINCREMENT THE PASS NUMBER 
BIC 9100000,6PASS = 33D0N°T ALLOW A NEG, NUMBER 
DEC CPC)¢ 3sLOOP? 
SEOPCT: ,WORD a 
BGT SDOAGN 37 YES 
MOV CPC) 4, OCPC)o ssREGTORE COUNTER 
SENDCT: .WORD 1 
seorct 
TYPE eo SENDNG seTYPE “END PASS® 
6GET42: MOV 0042,R0 99GET MONITOR ADDRESS 
BEQ sDOAGN seBRANCH IF NO MONITOR 
RESET s3CLEAR THE WORLD 
SENDAD: JSR PC, CRO) #360 TO MONITOR 
NOP 338AVE ROOK 
NOP ; #3FOR 
NOP 4 - geactii 
SDOAGN: 
JMP OCPC)+ 3s RETURN ° 


GRTWADs ,WORD START 
SENULL: BYTE -1,°1,8 ssNULL CHARACTER STRING 
SENDMNG: .ASCIZ <15><12>/END PASS/ 





EY 





TAI1 MANUAL INTERVENTION TEST 


DZTACC NEW 


1448 
1449 
1486 
1451 
1452 
1453 
1454 
1455 
1456 
1457 
1458 
1489 
1460 
1461 
1462 
1463 
1464 
1465 
1466 
1467 
1468 
1469 
1476 
1471 
1472 
1473 
1474 
1475 
1476 
1477 
1476 
1479 
1480 
1461 
1482 
14863 
1464 
14865 
1486 
1487 
14866 
1489 
1490 
1491 
1492 
1493 
1494 
1495 
1496 
1497 
1498 
1499 
1500 
1501 
1562 
1503 


006062 
006066 
006074 
006100 
006104 
006106 
606110 
006114 
006116 
006116 
006124 
006126 
006134 
006136 
006142 
006144 
006152 
006154 
006162 
006164 
006172 
006174 
006200 
006204 
086206 
006214 
006216 
006222 
006224 
006230 
006236 
006240 
006246 
006254 
006260 


MAINDEC91 1 -DETACeC 


SCOPE HANDLER ROUTINE 


104406 
032777 
@o1111 


000416 


013746 
012737 
005737 
012637 
000463 
022626 
012637 
000423 


032777 
001404 
127767 
001462 
105767 
001421 
126767 
101615 
032777 
001404 
016767 
000443 
105067 
005067 
000415 
032777 
001011 
005767 
001406 
005267 
026767 
002021 
012767 
016767 
105267 
011667 


000004 
006106 
177066 
000004 


000400 
173006 
172741 
172745 
001600 
172720 


172703 
172762 


004000 
172656 


172654 
172732 


000001 
000044 
172622 
172622 


173062 


600004 


173014 
172746 


172731 
172756 
172714 


172724 


172646 


172636 
172712 
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eSBTTL SCOPE HANDLER ROUTINE 
FPSPLHPHSSHSSHHSGEHHOGODISGSSISESCTRSHGSHOOSTOHFESSOVSEOSOOHHESSISIOD 
s@THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
3@AND LOAD THE TEST NUMBER(STSTNN) INTO THE DISPLAY REG. (DISPLAY<7¢6>) 
s@AND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<15:60> 
seTHE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE? : 
9@SWi4e3 LOOP OW TEST 
sesWilel INHIBIT ITERATIONS 
2eswe9e) LOOP ON ERROR 
peSuogas LOOP ON TEST IN SUR<730> 
9®CALL 
ge SCOPE 99SCOPESIOT 
SSCOPE: , 

Ckswr ssTEST FOR CHANGE IN SOFTeSUR 
188 BIT OBIT14,0SUR 33LO00P ON PRESENT TEST? 
BNE sOVER sev¥Es IF SWiéei 
s0e8CCSTART OF CODE FOR THE XOR TESTERGOCECE 
SXTSTR: BR 66 3sIF RUNNING ON THE *XOR® TESTER CHANGE 
geTHIS INSTRUCTION TO A *NOP* (HOPS246) 
MOV OCERRVEC,°-(SP)  336AVE THE CONTENTS OF THE ERROR VECTOR 
“ov 058, @8ERRVEC 99SET FOR TIMEOUT 
T8T 00177060 seTINE OUT OW XOR?P 
MOV (SP)¢,O8ERRVEC s3RESTORE THE ERROR VECTOR 
BR SSVLAD 99GO TO THE NEXT TEST 
563 cup (SP)o,(SP)¢ ssCLEAR THE STACK AFTER A TINE OUT 
MoV (SP)¢,@CERRVEC 3 ,9RESTORE THE ERROR VECTOR 
BR 78 33LOOP ON THE PRESENT TEST 
663;0008GEND OF CODE FOR THE XOR TESTERGCECE 
BIT OBITOC, OSWR 33L00P ON SPEC. TEST? 
BEQ 28 238R If nO 
CmMPB OSWR, OTSTNN 390" THE RIGHT TEST? SUR<720> 
BEQ COVER s28R IF YES 
283 TSsTB sERFLG 33HAS AN ERROR OCCURRED? 
BEQ 38 338R IF NO 
CPB SERMAX, SERFLG s9MAX, ERRORS FOR THIS TEST OCCURRED? 
BHI 38 398R IF NO 
BIT @BITO9,O@SWR 33LOOP ON ERROR? 
BEO 4S 379BR If NO 
783 x +a cane 33S8ET LOOP ADDRESS TO LAST SCOPE 
R GOVER 
463 CLRB sERFLG 79ZERO THE ERROR FLAG , 
CLR STIMES 29CLEAR THE NUMBER OF ITERATIONS TO MAKE 
BR is ssESCAPE TO THE NEXT TEST 
38% BIT @CIT11,@SWR seINHIBIT ITERATIONS? 
BNE is 33BR IF YES 
TST sPASS s3I1f FIRST PASS OF PROGRAM 
BEQ is 3 INHIBIT ITERATIONS 
Inc sIcntTt Ss INCREMENT ITERATION COUNT 
Cup OTIMES,SICNT gsCHECK THE NUMBER OF ITERATIONS MADE 
BGE sOVER 39BR IF MORE ITERATION REQUIRED 
183 MOV @1,8ICNT seREINITIALIZE THE ITERATION COUNTER 
MoV SMXCNT,STIMES  33SET NUMBER OF ITERATIONS TO DO 
SSVLAD: INCB eTsSTNM s;COUNT TEST NUMBERS 
MOV (SP), SLPADR 226AVE SCOPE LOOP ADDRESS 
FY 





yy? 


” 


‘MAINDEC©3 1 eD2TAC2C 
INE 


TAL MANUAL INTERVENTI 

DZTACC,WEW SCOPE HANDLER ROUT 
1504 006264 611667 172620 mov 
1505S 6062780 905067 172674 CLR 
1306 606274 112767 909801 172613 MOVB 
1507 606302 616777 172574 172632 SOVER: HOV 
1508 606310 616716 172572 MOV 
1509 606314 900082 RTI 
1518 606316 0603720 SMXCNTs 2006. 


a i am > afr Bye. 5 oe 
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(S3P),- CLPERR s9GAVE ERROR LOOP ADDRESS 
SESCAPE gsCLEAR THE ESCAPE FROM ERROR ADDRESS 
01, 6ERMAX ssONLY ALLOW OWEC(1) ERROR ON WEXT TEST 
STSTNM,ODISPLAY ssDIGPLAY TEST NUMBER 
OLPADR, (SP) ssFUDGE RETURN ADORESS 

seFIXes PS 

294AX, BUMBER OF ITERATIONS 


ay 





S41 
1512 
1513 
1914 
1515 
1516 
1517 
1518 
1519 
1526 
1$21 
1322 
1523 
1524 
1525 
1526 
1527 
1528 
1529 
1530 
1531 
1532 
1533 


1535 
1536 
1537 
1538 
1539 
1546 
1541 
1542 
1543 
1544 
1545 
1546 
1547 
1548 
1549 
1550 
1551 
1552 
1553 
1554 
1555 
1556 
1557 
1558 
1559 
1560 
1561 
1562 


1534. 


006320 
006320 
006322 
006326 
006332 
006336 
006342 
006346 
006350 
006356 
006364 
006 366 
006372 
006376 
006402 
006410 
006416 
006424 
006426 
006432 
006436 
006436 
006442 
006444 
906446 
006450 
006456 
086460 
006464 
006470 
006472 
006476 
006476 
006504 
006506 
006516 
006510 


104406 
011437 
011537 
010037 
010137 
103267 
001775 
016777 
032777 
001462 
104401 
605267 
011667 
162767 
117767 
032777 
001604 
004767 
104401 


001462 
016716 


022737 
00100, 
066000 


TAI1 MANUAL INTERVENTION TEST 
DZTACC .WEW 


001162 
001164 
001124 
001126 
172835 


172526 
002000 


172502 
820000 


000060 
001177 


172476 


172424 
172500 


172472 
006014 


MAINDEC“11 -DETAC eC 
ERROR HANDLER ROUTINE 


172564 
172554 


172506 
172476 
172514 


172462 


000042 


eSBTTL ERROR HANDLER ROUTINE 


s®AND GO TO TYPERR ON ERROR 


9e6wiSei 
2e6Wi3ei 
3eSW10e) 
3@Swesei 
s@CALL 
ge ERROR 
SERROR? 
CKSWR 
MOV 


783 


SEQ 0047 
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$PSEGSSDOSTIESSEHSTEHLE STFS TG HGH SHG VOSHFOGDEHO GO PEO DEFOSSSOHTTOORBID 
s@THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
P@SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL 
geTHE SWITCH OPTIONS PROVIDED BY THIS ROUTINE AREs 

HALT OW ERROR 
INHIBIT ERROR TYPEOUTS 
SELL OW ERROR 
LOOP ON ERROR 
is SPERRORSEMT AND NWEERROR ITEM NUMBER 

s37EST FOR CHANGE IN GOFTeSUR 
OTACS, OCGREGO 9SAVE THE STATUS REG, 
OTADB, O¢SREGI sSAVE THE DATA SUFFER 
RO, OOSGDDAT gRO WILL CONTAIN THE GOOD DATA 
Ri, @e@sBODAT gRi WILL CONTAIN THE BAD DATA 
sERFLG 236ET THE ERROR FLAG 
78 93DON°T LET THE FLAG GO TO ZERO 
STSTNM, CDISPLAY s3DISPLAY TEST NUMBER AND ERROR FLAG 
@BIT10, OSUR 378ELL OW ERROR? 
is 3380 © SKIP 
o SBELL seRING BELL 
sERTTL ssCOUNT THE NUMBER OF ERRORS 
(8P), SERRPC 33GET ADDRESS OF ERROR INSTRUCTION 
62, 8ERRPC 
OSERRPC,SITEMB 33STRIP AND SAVE THE ERROR ITEM CODE 
@BIT13,06WR 336KIp TYPEOUT IF SfT 
208 23SKIP TYPEOUTS 
PC, TYPERR 3360 TO USER ERROR ROUTINE 
e SCRLF 
@SwWR ss3HALT ON ERROR 
36 s3SKIP IF CONTINUE 

seHALT ON ERROR! 

s3TEST FOR CHANGE IN sOFT-SUR 
@BITO9, OSWR 39LOOP ON ERROR SWITCH SET? 
4s 33BR IF NO 
6LPERR, (SP) 3sFUDGE RETURN FOR LOOPING 
sESCAPE s9CHECK FOR AN ESCAPE ADDRESS 
56 378R IF NONE 
SESCAPE, (SP) ssFUDGE RETURN ADDRESS FOR ESCAPE 
@GENDAD, 0042 g2ACToii AUTO-ACCEPT? 
68 29B8RANCH IF NO 

29¥ES 

9s RETURN 

HY 





a ET 


” 


-) 
TAI1 MANUAL INTERVENTION TEST MAINDEC©11-DETAC-C MACY11 27(732) 11°JUN©76 13:51 PAGE 35 SEQ e048 
3 DETACC NEW ERROR TYPEOUT ROUTINE 
1563 F PSSSHOSSSSSSHSSHSSSOSHGHSHSHHSHHHHESHHHSHSHHSOHHHSHHSHSHHOOSCOSOOS 
@ 1564 STHIS ROUTINE WILL TYPEOUT THE ERROR MESSAGES 
1565 | 
1566 906512 104401 001177 TYPERRs TYPT ,SCRLF sTYPE A CARRIAGE RETURN & LINE FEED 
e 1567 @06516 610046 Td RO, -( 8P) sSAVE RO 
1868 006528 113700 01114 MOVE O06ITENB, RO sPICKUP THE ITEM INDEX 
1569 606524 065300 DEC Re sADJUST THE INDEX 
Fan) 1870 @86526 906300 ASL Re $80 IT WILL WORK FOR 
1571 666530 006300 ASL Re STHE ERROR TABLE 
1872 806532 986300 ASL Re 
& 1573 006334 662700 001236 ADD OSERRTB, RO sFORM THE TABLE POINTER 
1574 606540 912067 00002 MOV (RO), 18 sPICKUP "ERROR MESSAGE® POINTER 
1575 906844 104401 TYPE sTYPE "ERROR NESSAGE® 
3 1576 806546 980000 18s 8 S°ERROR HESSAGE POINTER® GOES HERE 
1877 806558 104401 001177 TYPE =, SCRLF 
1578 006554 612067 99004 MOV (RO), 26 sPICKUP "DATA HEADER® POINTER 
a 1579 906560 901494 BEO 38 s1F "9 DON’T TYPE 
1580 006562 104401 TYPE sTYPE "DATA HEADER : 
1561 806564 90000 268 8 S°DATA HEADER® POINTER GOES HERE 
a) 1582 006566 104401 001177 TYPE ,SCRLF 
1583 006572 912000 388 MOV (RO), RO sPICKUP DATA POINTER? 
1584 666574 901004 BNE , 58 $17 THERE 18 DATA TO TYPE Go DO IT 
® 1565 906576 012690 48: MOV (8P)¢,RO sRESTORE RO 
1566 906600 104401 001177 TYPE ,SCRLF sTYPE A CARRAGE RETURNGLINE FEED 
1587 906604 600207 RTS PC sRETURN 
e 1588 006606 58: 
1589 606606 013046 Mov O(RO)+,°(SP) 5 9SAVE OCRO)® FOR TYPEOUT 
1590 s9TYPE DATA 
2 1591 @06610 104402 - TYPOC $960 TYPE**OCTAL ASCIICALL DIGITS) 
1592 606612 005710 T8T (Re) s TERMINATOR? 
1593 606614. 901770 BEO 48 sBR IF YES 
e 1594 006616 104401 006624 TYPE = 68 sTYPE 2 SPACES 
159S 006622 900771 Ba 58 s LOOP 
1596 006624 020040 TY) 68: eASCIZ 7 / sASCII STRING OF 2 SPACES 
@ 1597 006630 EVEN 
8 
@ 
oS 
@ 
a 
9 
o 


IY 


1598 
1599 
16006 
1601 
1602 
1603 
1604 
1665 
1606 
1607 
1608 
1609 
1610 
1611 
1612 
1633 
1614 
1615 
1616 
1617 
1618 
1619 
1620 
1621 
1622 
1623 
1624 
1625 
~ 1626 
1627 
16286 
1629 
1630 
1631 
1632 
1633 
1634 
1635 
1636 
1637 
1638 
1639 
1640 
1641 
1642 
1643 
1644 
1645 
1646 
1647 
1648 
1649 
1650 
1651 


006630 
006630 
006634 
006642 
006646 
006654 
006660 
006664 
006666 
606676 
606672 
006674 
006676 
606760 
006702 
696704 
006706 
006710 
006712 
006714 
006720 
006724 
606730 
006732 


006734 
006734 
906740 
006746 
006752 
006760 
006764 
006766 
006776 
006774 
006776 
007000 
007002 
007004 
007006 
0070106 
007012 
007014 
007016 
007020 
007024 
007030 
007034 


TAI1 MANUAL INTERVENTION TEST 
DZTACC NEW 


000044 
000072 
001202 
000002 
001204 
600040 


090044 
006732 
001202 
000602 
001204 


000040 


7 


MAINDEC*1 4 -DETACHC 
ROUTINE TO WAIT OW THE READY BIT TO SET 


000044 
001202 


PP OCLSSOOESHOSOSHCOD ECHOES OHHORHEHELOOOSOFSHOHSHCHDSOSSCHOOOESE® 
sROUTINE TO WAIT OW THE READY BIT 


WAIT, OW, READY: 
‘CLR 


WAITi: BIT 


WAIT4s IWC 
WAIT2: © 


HGHTIM: © 
WAIT3: MOV 


RTI 
MAXCNTs @ 


POR 
sROUTINE TO WAIT ON TRANSFER REQUEST 
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WAIT2 

MAXCNT, HGHTIN 
(SP) ¢,0@SAVPC 
@2,@0SAVPC 
(SP), O0SAVPS 
@READY, OTACS 
WAITS 

@TACS 

WAITS 

4 

WAITS 

(PC)¢ 


WAIT! 
CPC)¢ 


WAITI 

2 

Oe SAVPB.°( SP) 
OSSAVPC, (SP) 
@2.(SP) 


WAIT, FOR, XFER.REQS 
" CLR 28 


MOV 
MOV 
SUB 


183 TSsTB 


58s INC 
rd FE 8 


463 MOV 


OOMAXCNT,38 
(SP)¢,@8SAVPC 
@2,@e8SAVPC 
(SP) ¢,@@SAVPS 
@eTAcs 

48 

@READY, @OTACS 
58 

4 

46 

(PC) 


18 
(PC)¢ 


18 

3 
OSSAVPS,-(SP) 
@OSAVPC, (SP) 
¢2,(8P) 


sSETUP MAX, TIME TO WAIT OW "READY® 
GET THE PC OF THE WAITREADY INSTRUCTION 


SAVE THE PS. 
sREADYS1? 
360 ON IF YES 


sCHECK TRANSFER REQUEST 


s°TRANGFER REQUEST® SET WHILE WAITING OW “READY 


sCOUNT FAST COUNTER 


3G0 CHECK °READY" AGAIN 
sCOUNT LOOP COUNTER 


3G0 LOOP AGAIN 


s*READY® FAILED T0 SET 
sGET THE STATUS BACK 


sSETUP WASTE TIME LOOP 
sGET THE PC OF THE MAITXFER INSTRUCTION 


sSAVE THE PS 


sCHECK XFER REO 


sExXIT IF SET 
sLOOK AT READY 


sBR IF *READY® Isn°T SET 
s*READY® SET WHILE WAITING FOR °XFER REQ* 


sCOUNT 


9BR IF MORE TO DO 


s*TRANSFER REQUEST® FAILED TO SET 
sGET THE STATUS BACK 


sGET THE PC 
3GO0 BACK 


T4 









(#) > > 
TAI11 MANUAL INTERVENTION TEST WAINDECe11-DZTACeC MACY11 276732) ii1eJUN@76 13981 PAGE 37 ste esse 
@ DZTACC ,WEW ROUTINE TO WAIT OW TRANSFER REQUEST 
1682 7 9 000000000000000000060050000000000000000000000000000000000000008 
1683 : 
e +4 . oSBTTL ROUTINE TO ASK THE OPERATOR WHAT DRIVE(S) TO TEST 
i 
© 1686 sCALL 
1687 3 JSR PC, @RASKDRV 
cone ] RETURN sNOTEs RG AND Ri ARE OESTROYED 
165 
e 1668 667036 104401 0612552 ASKDRV: TYPE ‘ @ MBGDRYV s<CRLF>*ORIVE(S)? ® 
1661 607042 605067 172156 CUR ORVRKEY 
e@ 1662 607046 104410 ROLIN 960 GET A DATIVE 
1663 607050 612660 MOV (SP)¢,RO sSETUP TO CHECK FOR VALID DRIVE(S) 
1664 607052 105716 TSsTB @Re gWAS A DRIVE SELECTED? 
@ 1665 607054 601425 BEOQ WOTLGL g8Rr IF HO 
1666 667056 612701 001224 MOV eDRVKEY, Ri 
1667 ©607062 122718 900101 LOOP: CMPB @°A, ORO gWAS DRIVE "A® SELECTED? 
S 1668 0607066 601062 BNE WOTA p8R IF HO 
1669 607070 112021 MOVB CRODOe (RID¢ 9SET KEY FOR DRIVE “A* 
1678 607072 900411 BR WEXT 
@ 1671 ©07074 122710 000102 NOTA’ CMPB 0°B, ORO gWAS ORIVE "B° SELECTED? 
1672 007160 601602 BNE uoTs eOr IF NO 
1673 007102 112021 HOVB CRODO,CRIDE sSET KEY FOR DRIVE °B° 
@ 1674 607104 900404 BR NEXT b 
1675 607106 122716 60054 NOTBs CMPB eS4,0RO . sWAS A COMMA TYPED? 
; 1676 OO7112 901006 BNE WOTLGL s0R IF WO 
Ss 1677 @071184 105720 TsT8 CRO)D¢ sOUMP THE COMMA 
1678 907116 105710 NEXT TSTB @RO s TERMINATOR? 
1679 607120 901406 BEQ ExIT sR IF YES 
& 1680 007122 622701 001226 Cup ODRVKEYe2, Ri sTWO DRIVES SELECTED? 
1681 607126 101755 BHI LOOP sR IF HO 
1662 007130 104401 601176 NOTLGL: TYPE » SQUES sILLEGAL INPUT DETECTED 
oS 1663 0607134 600740 BR ASKDRV 3G0 TRY AGAIN 
1684 007136 605767 172062 EXITs TST DRVKEY sANY ORIVE SELECTED? 
16685 007142 601772 BEQ NOTLGL sBR IF KO 
fab) 1686 007144 600207 RTS Pc 
1667 
G 
& 
®@ 
@ . 
8 
@ 
a) 
Ku 


—— 


TAI MANUAL INTERVENTION TEST 
DETACC .WEW 


1668 
1689 
1698 
1691 
1692 
1693 
1694 
1695 
1696 
1697 
1696 
1699 
1700 
1701 
1702 
1703 
1704 
1705 
1706 
1707 
1708 
1709 
1710 
1741 
1712 
1713 
1714 
i715 
1716 
1717 
1718 
1719 
1720 
1721 
1722 
1723 
1724 
1725 
1726 
1727 
‘1728 
1729 
1730 
1731 
1732 
1733 
1734 
1735 
1736 
1737 
1738 
1739 
1740 
1741 
1742 
1743 


007146 
007150 
007154 
607156 
0071608 
607162 
007166 
007170 
007174 
007200 
007204 
007212 


007216 
007224 
007230 
007234 
007236 
007240 
007242 
007246 
007250 
0607254 
007260 
007264 
007270 
007272 
007274 
007276 
007362 
007304 
007306 
007310 
007312 
007314 
007320 
007324 
067330 
007334 
007336 
007342 
007346 
007350 
007354 
007360 
007362 
0097366 
007372 
007374 
007460 
007402 
007404 





010046 
104401 
104411 
012600 
001423 
620027 
103770 
010037 
062700 


‘910037 


013737 
005237 


013737 
003237 
104401 
104411 
012600 
001411 
620027 
163378 
010037 
062700 
010037 
164401 
104411 
012608 
001413 
020027 
101370 
000300 
006200 
006200 
606200 
042700 
010037 
104461 
016746 
164402 
104401 
016746 
194462 
104401 
016746 
104402 
104401 
016746 
104402 
164401 
104407 
012600 
022700 


001212 
001214 
012576 


001216 
000002 
001220 
012606 


000007 


177437 
001222 
012620 
171652 


012626 
171644 


012635 
171636 


012646 
171630 


012661 


MAINDEC#1 4 eDZTACeC 
ROUTINE TO ASK THE OPERATOR WHAT DRIVE(S) TO TEST 


001210 
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I FOSSOHHSSHSSSHSSHSESSHESHESTHFSHOSCHHSOHOSHHHOSHHHHOSHEHOOHORHODOD 


sCALL 
sJ5R 


PC, @OASKADR 

MOV RO, °( SP) 
TYPE o MSGASK 
RDOCT 

MOV (SP)o,RO 
BEQ 3g 

CMP RO, 0169006 
BLO 18 

MOV RO, OGTACSL 
aDD 02,R0 

MOV RO, O@@ TADBL 
MOV @OTACSL, OOTACEH 
Inc @eTACSH 

MOV @@TADBL, 0¢ TADBH 
INC @eTADBH 
TYPE eo MBGVEC 
RDOCT 

MOV (SP)¢,RO 
BEO $8 

cup RO, 01600 
BHIS 38 

MOV RO, @OTAVEC 
ADD 02,R0 

MOV RO, OOTAVECS2 
TYPE o4SGPRI 
RDOCT 

MOV (SP)¢,RO 
BEOQ 6s 

CMP RO, 67 

BHI se 

SWAB Ra 

ASR RO 

ASR RO 

ASR RO 

BIC 0°C<340>,RO 
MoV RO, OGTAPRIO 
TYPE eMTACS 

MOV TACSL, o( SP) 
TYPOC 

TYPE oMTADB 

MOV TADBL, ©( SP) 
TYPOC 

TYPE eMTAVEC 

MOV TAVEC,°( SP) 
TYPOC 

TYPE eMTAPRI 

MOV TAPRIO,°( SP) 
TYPOC 

TYPE oMSGOK 
RDCHR 

MOV (SP)¢,RO 
CMP #15,R0 


sSAVE RO 

e°TACS?® 

9GET VALUE 

sPICK UP THE OCTAL .NUMBER 

sIF °@* USE OLD VALUES 

gMAKE SURE If I8 A BUS ADDRESS 


sSAVE TOR TACS 

s6TEP TO TADB ADORESS 
sAND SAVE If 

sSET UP TACS UPPER 
s8YTE POINTER 


SET UP TADB UPPER 
sBYTE POINTER 
3° VECTOR?” 


sMAKE GURE ADDRESS IS IN VECTOR AREA 
9SAVE AS VECTOR ADDRESS 


sASK FOR PRIORITY 


sIF *@* USE OLD VALUE 
sMAKE SURE ITS VALIO 


gPUT INTO HIGH BYTE 
gAND SHIFT 
sINTO PROPER 
sPOSITION 
sSAVE ONLY PRIORITY BITS 
sSTORE IT AWAY 
3 TACSs* 

39SAVE TACSL FOR TYPEOUT 

3360 TYPEe*OCTAL ASCIICALL DIGITS) 
s*TADBs* 

37SAVE TADBL FOR TYPEOUT 

33G0 TYPE-eOCTAL ASCIICALL DIGITS) 
s"VECTORs® 

ge3SAVE TAVEC FOR TYPEOUT 

33GO TYPE-"OCTAL ASCIICALL OIGITS) 
s*PRIORITYs® 

33SAVE TAPRIO FOR TYPEOUT 

33GO TYPE--OCTAL ASCIICALL DIGITS) 
2"OKP?® 
360 READ ONE CHARACTER 
sGET IT 
218 IT "CR®? 


LY 


rere CC EE eee 


_—il 


TAI1 MANUAL INTERVENTION TEST -c 
ROUTINE TO INPUT CSR,DBR, AND VECTOR ADDRESS AWD PRIORITY 


ozracc 


007416 
007412 
007416 
007420 
007424 
007426 
007432 
007434 


600131 
001176 
012667 


MAINDEC©11¢DZTAC 


783 


WACY11 27(€732) 


oMYES 
(8P)e,RO 
ec 
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sBRANCH IF YES 
st8 If “¥*"? 


? 
gAND LET HIM CORRECT THEN 
sTYPE OUT “¥Es" 











CS | 
TA11 MANUAL INTERVENTION TEST MAINDEC“11eDZTAC-C MACY11 27(732) 119JUN-76 13351 PAGE 40 SEQ 0053 
i) DZTACC .NEW ROUTINE TO INPUT CdR,DBR, AND VECTOR ADDRESS AND PRIORITY ‘ 
1782 FPEOOROOHTDOR EERO OH HEE THOTEOHDOFES HE EGO FEE HH ENED EE EOD OREO DE OEOERD 
2 1753 PPSOOPEEESUSH ORDERS CSFOTAHEHHTEDRE OOOO SESH OEHES SH SEEROREHREREOES 
1754 sROUTINE TO TYPE DIRECTIONS TO OPERATOR AND WAIT FOR RESPONSE 
1755 sCALLs 
@ 1756 ] JSR RO, OBASKQUES : 
1757 ] RETURN HERE OW A RESPONSE OF *"¥"* 
1788 3 RETURN HERE ON A RESPONSE OF “N* 
& 1789 
1760 007436 ASKQUES: 
1761 007436 610146 MOV Ri,°(SP) sSAVE Ri 
& 1762 007440 612067 600006 MOV (RO)*,28 sPICKUP THE MESSAGE POINTER 
1763 6007444 104401 601177 TYPE e SCRLF sTYPE A “CR® AND °LF*® 
1764 007450 104401 183 TYPE sTYPE THE MESSAGE 
@ 1765 607452 980000 283 ® sMESSAGE POINTER GOES HERE 
1766 007454 104407 ROCHR 3CET OWE CHARACTER FROM THE TTY 
1767 ©07456 612601 MOV (SP)¢,Ri sAND PUT IT IW Ri 
@ 1768 007460 620127 600015 CMP Ri,#15 sCHECK THIS CHARACTER 
1769 607464 001443 BEQ 4% ;8R IF ITS A *CR® 
1770 007466 626127 600116 CMP Ri,e°N 318 IT A °N°? 
is) 1771 0807472 001415 BEQ 38 s8R IF YES 
1772 607474 626127 900131 CMP Ri,e°Y sts IT A *¥" 
1773 607500 0601007 BNE $$ 3B8R IF NOT *Y¥* 
@ 1774 807502 104481 0607510 TYPE 2658 ssTYPE ASCIZ STRING 
1775 ©07506 900403 BR 648 s3GET OVER THE ASCIZ 
1776 33658: ,ASCIZ / YES/ 
@ 1777 007516 6483 
1778 607516 000426 BR 4s 360 TO EXIT 
1779 @07520 104401 601176 58:3 TYPE eSQUES sUNKNOWN REQUEST 
@ 1780 007524 900751 BR is 3GO ASK AGAIN 
1781 007526 38% 
1782 007526 104401 0607534 TYPE 678 seTYPE ASCIZ STRING 
& 1783 007532 600415 BR 668 33GET OVER THE ASCIZ 
17864 33678: ,ASCIZ @ NOweeSKIPPING THIS TEST# 
1785 607566 6683 
@ 1786 0607566 0605720 TST (RO)¢ +STEP OVER “CR® RETURN 
1787 ©607570 605037 001166 CLR @esTIMES sCLEAR ITERATIONS 
178@ ©07574 104401 001177 483 TYPE  SCRLF 
® 1789 007600 612601 MOV (SP)¢,R1 sRESTORE Ri 
1790 687602 980200 RTS RO sRETURN 
1791 
2 
oa 
a] 
ie) 
9 
3 
AS 
@ 
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DZTACC .WEW 


1792 
1793 
1794 
1795 
1796 
1797 
1798 
1799 
16e0e 
1801 
1802 
1603 
1604 
1605 
1806 
1607 
1808 
1869 
16108 
1811 
1612 
1613 
1614 
1815 
1816 
1817 
18618 
18619 
1820 
1821 
1822 
1823 
1824 
18625 
18626 
1627 
1828 
18629 
18630 
1831 
1832 
1833 
1634 
18635 
1836 
1637 
1838 
1839 
1640 
18641 
1842 
1843 
1644 
1845 
1646 
1847 


007604 
007610 
007614 
007620 
007622 
007636 
007634 
007636 
007642 
067646 
607650 
007654 
007656 
007662 
007664 
007666 


007670 
007674 
007700 
667704 
007710 
007712 
007720 
007724 
607726 
007732 
007736 


012706 
6137064 
013765 
o0e00es 
012737 
004737 
010314 
112714 
032714 
061775 
112714 
164412 
032714 
001772 
000000 
060746 


004737 
012766 
013704 
013705 
o0eces 
012737 
004737 
010314 
112714 
632714 
061775 


067604 
010610 


000017 
000046 


060001 © 


010352 
001100 
001206 
001212 


007674 
010610 


000017 
000040 


MAINDEC©41°DZTACeC MACY11 27(€732) ifeJUN-76 13951 PAGE 41 8EO 0054 
eseesneeoe MANUAL ADJUSTMENT ROUTINES eevceasess 


001110 


OU A 
CEU UU 
sTHE FOLLOWING ROUTINES CAN BE USED TO MAKE ADJUSTHENTS TO THE TUGS 
sWOTES 666 BEFORE USING ANY OF THE ROUTINES LOAD AND START AT 214 666 
PIIIPIIIOTAITIATTTOTTATATTTTATTATOATTTTTTTTATTTATTTOTTTOTOTTAATAAAE ETA 


FP OOSOSOSEOETOOOHOEOHOOEEHSOEREHEDOT ESOS DOSCOOEDEOOCOOCCOOOTEOCOS 

’ WRITE FILE GAPS FROM "BOT* TO “EOT® 
sSTART AT 226 
sTHIS ROUTINE CAN BE USED TO ADJUST THE “WRITE GAP MOHO* AND 
sTHE “WRITE DELAY MONO", 

3990000 0800000000 00009000 0009000000006005000000000000800000000008 


WFGSUB: MOV @STACK, SP sREEP THE STACK OUT OF THE WAY 
MOV OeTACSL, TACS sSETUP THE TA STATUS AND 
MoV Oe TADBL, TADS sDATA BUFFER REGISTERS 
RESET sRESET THE WORLD 
MOV OWFGSUB, O¢SLPERR sSETUP THE LOOP OW ERROR ADDRESS 
JSR PC, CONXTORYV 360 SETUP FOR NEXT DRIVE 
MOV DRIVE, OTACS sSELECT DAIVE 
MOVB @REWIND!GO, @TACS sSEND TAPE TO *BOT® 
1eess BIT @READY,@TACS gWAIT ON READY 
BEQ 1008 
183 MOVB eWUrGiGO,eTACS sURITE A FILE GAP 
WAITREADY sWAIT ON READY 
BIT @LEADER, @TACS sAT °CLEAR LEADER*? 
BEQ is Br IF NO 
HALT ssTOp IF YES 
BR wrGsuUB sLooP OW CONT, 


PEST 
’ WRITE CONTINUOUS BLOCKS OF DATA 

sSTART AT 224 

sTHE PROGRAM WILL HALT THREE(3) TINES 

sAFTER EACH HALT SET THE SWR AND PRESS CONTINUE 

sHALT 1 eee SWR<C720> & NUMBER OF BYTES PER BLOCK 

sHALT 2 eee SWRC730> @ PATTERN DESIRED 

sHALT 3 eee SWR<K<1530> & OPERATIONAL SWITCH SETTINGS 

sTHIS ROUTINE CAN BE USED TO ADJUST THE “GAP TIME HONO* 

ee IF USING SOFTWARE SWITCH REGISTER, AFTER 

3 EACH HALT OPERATOR WILL BE PROMPTED 

FOR THE VALUE WITH “SWREXXXXXX NEWs®* 

PES SITIO 


WRTSUBs JSR PC, OOSETBUF sGET BLOCK SIZE AND PATTERN 
WLOOPs MOV OSTACK, SP sKEEP THE STACK OUT OF THE WAY 
MOV @eTACSL,TACS sSETUP THE TA11 STATUS AND 
MoV @*@TADBL, TADB sDATA BUFFER REGISTERS 
RESET sRESET THE WORLD 
MOV @WLOOP, @68LPERR sSETUP THE LOOP OW ERROR ADDRESS 
JSR PC, @GNXTDRV 360 SETUP FOR WERT ORIVE 
MOV DRIVE, OTACS sSELECT ORIVE 
MOVB @REWIND!GO,@TACS 3SEND TAPE TO °BOT® 
10083 BIT @READY, OTACS pWAIT OW READY 
BEO 1008 














7) 
TAI MANUAL INTERVENTION TEST  WAINDEC’11-DZTAC<C MACYi1 276732) i1eJUN~-76 13351 PACE 42 SEO 0055 
Ss OZTACC NEW WRITE CONTINUOUS BLOCKS OF DATA 
1848 0667748 604737 610466 iss JER PC, OOWRTBLEK sWRITE A BLOCK 
a 1649 0607744 0632714 #920000 Brit OLEADER, OTACS pAT "CLEAR LEADER? 
1888 967758 0601773 BEQ if 98Rn IF BO 
1851 667752 seseeee HALT s6TOP IF *£OT* 
2S tee 007754 0900747 BR WLOOP sloop If Cont, 
16$3 
1684 
@ 165s LPOFSESFEHFHHODEDOOLOOHO RISO OG HOETE SOHO REOGTOSHETHOLAODIORHRERORD 
1656 3 READ CONTINUOUS BLOCKS OF DATA 
1687 pSTART AT 230 
& 16se@ gTHIS ROUTINE CAN BE USED TO ADJUST THE *SIGHAL HOnO? 
1889 pAND THE *THRESHOLD POT*, 
1866 3990080008000 000088600005 0000 0000060009 0000 000000000800 08SH088008 
Cr 1861 6867756 612766 001180 RDSUBs HOV @STACK, SP gKEEP THE STACK OUT OF THE WAY 
1862 607762 613704 0601206 NOV Oe TACSEL, TACE sSETUP THE TAI4 STATUS ABD 
1863 607766 013705 661212 MOV OGTADBL, TADB gDATA BUFFER REGISTERS 
eo 1864 0667772 es8eces RESET . sRESET THE WORLD 
1865S 9607774 612737 87756 9611106 MoV CRDSUB, OOOLPERR sSETUP THE LOOP OW ERROR ADDRESS 
1866 610002 664737 010610 JER PC, CONXTORY 960 SETUP FOR BEXT ORIVE 
@ 1867 610006 0610314 nov DRIVE, OTACS sSELECT DRIVE 
1866 610018 112714 0680017 mOvB @REWIND1GO,@TACS #SEND TAPE TO *BOT* 
1869 610014 9632714 seseee4e 160863 BIT @READY, OTACS sWAIT OW READY 
a 1876 610020 0601775 BEO 1006 
1871 6106022 0604737 6106530 16s JSR PC, OORDBLK sREAD A BLOCK 
1872 610026 0632714 620006 BIT @LEADER, OTACS sAT "CLEAR LEADER*? 
e 1873 610032 0061351 BNE RDSUB 38R IF YES--<L,00P 
1674 010034 600772 BR is 
1675 
@ 1676 
18677 PPOOSSOGSSTSSHSOLID IGE GIOSTVHGGSS TOS TOSTOGHV SIO GO OSOOAOTODIOEGOSS 
1678 3 WRITE A FILE GAP AND A BLOCK OF DATA FROM BOT TO EOT 
@ 1879 sSTART AT 234 
18680 sTHE PROGRAM WILL HALT THREE(3) TIMES 
1661 pAFPTER EACH HALT SET THE SWR AND PRESS CONTINUE 
} 16862 sHALT 1 ee SUR<726> & NUMBER OF BYTES PER BLOCK 
1663 gHALT 2 eee SUR<C730> & PATTERN DESIRED 
1684 sHALT 3 eee SYRCIS3O> & OPERATIONAL SWITCH SETTINGS 
t ises gTHIS ROUTINE CAN BE USED TO ADJUST THE “WRITE GAP KONO" 
1866 see IF USING SOFTWARE SWITCH REGISTER, AFTER 
1807 i ZACH HALT OPERATOR WILL BE PROMPTED 
B 1666 3 FOR THE VALUE WITH °SWReXXXXXX NEWs" 
1669 sAND THE "GAP TINE MONO", 
1696 FP OVGOHSFHSFSSESSCHTHE SS SSVWSSHEO GHG IN FOGL HS SOHOCIV GSO SECSOHSHIOSGHIOHHDS® 
@ 1891 610036 06804737 610352 WGPBLK: JSR PC, OOSETBUF sGET BLOCK SIZE AND PATTERN 
1892 010042 612706 001100 WSBLOPs: MOV OSTACK, SP sKEEP THE STACK OUT OF THE WAY 
1893 610046 613704 601206 MOV @O*STACSL, TACS sSETUP THE TAi1 STATUS AND 
@ 1894 010052 613705 601212 MoV @@TADBL, TADS sOATA BUFFER REGISTERS 
1695S 9610056 #909005 RESET sRESET THE WORLD 
1696 610060 612737 610042 001110 MOV ONGBLOP, OO6LPERR sSETUP THE LOOP OW ERROR ADDRESS 
So 1897 610066 904737 610610 J8R PC, CONXTDRYV 260 SETUP FOR NEXT DRIVE 
1698 810072 0610314 MOV ORIVE, OTACS sSELECT ORIVE 
1699 610074 112714 600017 mOVB @REWIND1GO,@TACS 3SEND TAPE TO *B80T* 
S 1906 810108 632714 #800040 10063 BIT @READY, OTACS sWAIT OW READY 
1901 610104 601775 BEO 1008 
1902 610106 112714 0600001 163 MOVB ewrGiGO,eTACS sWRITE A FILE GaP 
@ 1903 @10112 104412 WAITREADY sWAIT OW READY 


C5 





| £ 


— 





jer eee eceereseececeecece 


" 


TAI1 MANUAL INTERVENTION TEST 


DETACC NEW 


610140 
010144 
016150 
010154 
010156 
016164 
016170 
616172 
010176 
610202 
010204 
010210 
010214 
010216 
010222 
010224 
610230 
010232 


010234 
010240 
010244 
010250 
010252 
0106260 
010264 
010266 
010272 
010276 
010300 
010304 


032714 
001005 
004737 
032714 
001768 


6060808 
000741 


012706 
013704 


012706 
013704 
013705 
000005 
012737 
004737 
010314 
112714 
032714 
001775 
112714 
104412 


016466 
6200908 


MAINDEC 911 -DETAC-C 


MACY11 27(732) 
WRITE A FILE GAP AND A BLOCK OF DATA FROM BOT TO EOT 
sit @LEADER, @OTACS 
BNE ae 
J8R PC, OOURTBLK 
BIT GLEADER, OTACS 
BEOQ a6 
asi WALT 
BR WGBLOP 


@0ee17 
060049 


001100 
001206 
001212 


010234 
010610 


000017 
000040 


iteJUNo76 13051 PAGE 43 


gAT "CLEAR LEADER*? 
s8Rn IF YES 

sWRITE A BLOCK 

gAT "CLEAR LEADER*? 
s0R IF HO 

38T0P AT *£0T* 
eSTART OVER On CONT, 


3 99000900 000000000000000000000000000000000000 00000000 080000 000008 
] READ A BLOCK OF DATA AND A FILE GAP 


sSTART AT 240 


sITf CAB BE USED TO ADJUST THE “SIGHAL HONO*, THE THR 


sAND THE °TAPE BLANK HOHO*, 


£ § 0800008600008 600000000000000000 9800600000808 


RGPBLK: MOV @STACK, SP 
NOV @eTACSL, TACS 
MOV @@TADBL, TADB 
RESET 
MOV @RGPBLK, OOSLPERR 
JSR PC, CONXTORY 
NOV ORIVE, OTACS 
MOVB @REWIND1 GO, OTACS 
10088 It @READY, OTACS 
BEQ 1068 
18s JSR PC, OGRDOBLK 
BIT @LEADER, OTACS 
BNE RGPBLK 
MOVE @SFBG!GO,@TACS 
WAITREADY 
BIT @LEADER, OTACS 
BNE RGPBLK 
BR as 


9900500 0000000000000 
sKEEP THE STACK OUT OF THE WAY 
sSETUP THE TALi STATUS AND 
sDATA BUFVER REGISTERS 
sRESET THE WORLD 

sSETUP THE LOOP OW ERROR ADDRESS 

360 SETUP FOR BELT ORIVE 
sSELECT DRIVE 
sSEND TAPE TO *"BOT* 
sWAIT OW READY 


sREAD A BLOCK OF DATA 
AT °CLEAR LEADER"? 
s8R IF TEs 

sGET INTO A FILE GAP 


sAT °CLEAR LEADER*? 
s8R IP YES 
3 LOOP 


POR XS SO 
’ SPACE FORWARD FILE GAP FROM *BOT*® TO “E£OT* 


sSTART AT 244 


sTHIS ROUTINE CAN BE USED AFTER “WRITE FILE Gap* FOR LOW SEED 
sSPACE FOWARD (TAPE BLANK MONO CAN BE ADJUSTED), OR AFTER READ OR 
sWRITE A FILE GAP AND A BLOCK OF DATA FOR HIGH SPEED SPACE FORWARD 


s(SIGHAL MONO CAN BE CHECKED), 


PF FSSSHSSHSHSSSHSHSCHHSSHSSHSHHHSSHSHHHSSSHHHSSSHKHSHSHHSSOSEHCHHHOGOS 


SFFGSB: MOV @STACK, SP 
MOV @OsTACSL, TACS 
MOV @@TADBL, TADB 
RESET 
mov OSFFGSB, OCSLPERR 
JSR PC, OONXTORV 
MOV DRIVE, @OTACS 
MOVB GREWIND!GO,@TACS 
1008: BIT @READY, @OTACS 
BEQ 1008 
16% MOVB @SFFG1GO,eTACS 
WAITREADY 


;KEEP THE STACK OUT OF THE WAY 
sSETUP THE TAI STATUS AND 
sDATA BUFFER REGISTERS 
sRESET THE WORLD 
:SETUP THE LOOP OW ERROR ADDRESS 
360 SETUP FOR NEXT DRIVE 
sSELECT DRIVE 
3SEND TAPE TO "BOT* 
sWAIT ON READY 


sSPACE INTO A FILE GAP 
sWAIT OW READY 


. 





’ 


. ee 





TAG1 MANUAL INTERVENTION TEST 
DZTACC ,WEW 


010320 
016322 
010330 
616332 
010336 
010340 
010344 
910346 
010350 


010352 
010354 
010356 
610364 
010366 
0263760 
016376 
610374 
016376 
010402 
010404 
010410 
010412 
010416 
610422 
610424 
616432 
010434 
010436 
010436 
818444 
010446 
010454 
010456 
0104660 
010466 
010462 
010464 


032714 
001772 
080000 


000746 


001001 
104465 


157700 
001606 
105777 
001402 
012765 
005200 
019837 
005637 


000000 
022767 
G218e1 
104405 


117737 
001601 
104405 
600207 


016326 
000007 
@20cee 


000176 


1705446 
170537 
000376 


010462 
016464 


000176 


170476 
000176 








MAINDEC ©1 1 -DETACC MACY11 27(732) ifeJUNo76 13351 PAGE 44 Ste oes? 
SPACE FORWARD FILE GAP FROM "BOT® TO “EOT* ' 


170584 


176506 


010464 
170464 


BIT OLEADER, OTACS gAT "CLEAR LEADER*? 


B8£Q is s8n IF HO 
HALT sSTOP AT °EOT* 
BR SFFcsB sLOOP ON CONT, 


3 1090800000 00000080000 0000 FEDOLO OOOO OOOT OSH OREDTOSOODOO000OS80008 
o. BACK SPACE FILE GAP 

sSTART AT 250 

sTHIS ROUTINE CAN BE USED TO ADJUST OR CHECK THE “SIGHAL NOHO?, 
$ ) 9000 00000000000000000090000000000000000000 00000000000 0000000008 


BSFGSB: RESET sRESET THE WORLD 
MOV OBSFCSB, OOSLPERR sLOOP O8 ERROR ADDRESS 
mov DRIVE, OTACS sSELECT DRIVE 
18s MOVE eBsFG! GO, eTACcs sBACK SPACE A FILE Gap 
WAITREADY sWAIT OW READY 
BIT OLEADER, OTACS sAT “CLEAR LEADER®? 
BEO is s8R IF BO 
HALT STOP AT BOT 
BR BSFGsB sSTART OVER On CONT. 


3 9000000000000 0008 FOOT ODEO OOO DOS CODOOOTOOOTHUOTHCROREOODODOCR008 
¥ SETUP BLOCK SIZE AND PATTERN FOR SUBROUTINES 
3 9 O00800000000000000000000000 000000 O0HOOOEOOCDECTHO ODEO COCR DER008 
SETBUF: CLR RG 
HALT sOPERATOR PUTS BYTE COUNT IN SUR<720> 


Cup OSUREG, SuR sUSING S/W SUITCH REG? 
BNE 238 s40e GET OUT 
GTSWR sGET VALUE 
2063 sCONTINUE 
BIsB OSWR,RO sPICKUP THE BYTE COUNT 
BNE as sBR IF NON-ZERO 
TSTB OSWRe1 sCHECK IF GREATER THAN 377 
BEQ is s8Rn IF HO 
MoV 6376,R0 9SET FOR MAX ALLOWED 
183 Inc RO sMAKE IT 377 OR 1 
283 MOV RO, OOBLKLIN sSETUP THE BLOCK LIMIT 


CLR OOPATTRN 
HALT sOPERATOR PUTS PATTERN IN SUR<7:30> 


CMP @SWUREG, SUR pUSING S/¥ SUITCH REG? 
BNE 218 sNO* GET OUT 
GTSUR sGET VALUE 
2183 sCONTINUE 
MOVB OSWR, COP) TIAN sPICK UP THE PATTERN 
HALT _ pSET OPERATIONAL SWITCHES 
cup @SWREG, SWR sUSING S/W SWITCH REG? 
BNE 220 sNO~ GET OUT 
GTSWR sGET VALUE 
2268 sCONTINUE 
RTS pc sRETURN 
BLKLIM: © sREAD AND WRITE BLOCK SIZE 
PATTRN: © sPATTERW TO GO ON THE TAPE 


PP PSSSSSSSSSSSHSSSSKSHSHHHSSSSHHECHHSSHHSEHSSHHSHSESHSESHECHCSHOHSCHHOSO 





2016 
2017 
2018 
2019 
2626 
2021 
2622 
2023 
2024 
2025 
2026 
2627 
2028 
2629 
2030 
2031 
2032 
20633 
2034 
2635 
2636 
2037 
2038 
2039 
2040 
2041 
2042 
2043 
2044 
2045 
2046 
2047 
2048 
2049 
2050 
2051 
2052 
2653 
2084 
2055 
2056 
2057 
2058 
2059 
2060 
2061 
2062 
2063 
2064 
2065 
2066 
2067 
2068 
2069 


016466 
010472 
010476 
010500 
010504 
010506 
010510 
010512 
010516 
010520 
010524 
010526 


010530 
010534 
010540 
010544 
010546 
010552 
010554 
010556 
010560 
810562 
010564 
010566 
610570 
6193572 
010576 
010600 
010662 
010604 
010606 


010610 
010614 
010616 
010620 
010624 
010630 
010632 
010636 
010640 
010642 
010646 
610682 


013701 
412714 
104413 
032714 
001010 
005301 
002403 
113715 
000767 
052714 
104412 
000207 


013702 
013700 
112714 
104413 
032714 
001012 
005302 
662405 
011501 
120001 
001767 
164005 
000406 
052714 
1604412 
00S714 
106601 
104001 
000207 


108777 
100416 
005003 
013701 
122127 
001402 
012763 
10S711 
061002 
012701 
010137 
000207 


TAI MANUAL INTERVENTION TEST 
OZTACC NEW 
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WRITE ROUTINE FOR THE MANUAL OPERATIONS 

; WRITE ROUTINE FOR THE MANUAL OPERATIONS 

8 3 O88S8 0008080888008 8 0005 0000008008 0858000000608008000088 80000808 

WRIBLK: MOV OOBLELIN, Ri sPICKUP THE BLOCK SIE 
NOV ¢sWRITEIGO,@TACS sSTART A WRITE 

183 WAITXFER sWAIT OW TRANSFER REQUEST 
BIT @READY, OTACS s01D READY SET? 
BNE rT) s0R IPF YES 
DEC Ri sCOUNT THIS REQUEST 
BLT 78 sOR If TINE FOR, IL8S 
MOVE  SOPATTAN, OTADB sPUT DATA OW TAEE 
BR 18 sLO0P 

28: BIS sILBs, eTACS sWRITE CRC AND SHUT DOWN 
WAITREADY SWAIT OW THE READY FLAG 

36: RTS Pc 


010462 
010464 
oeee0es 


170324 


001230 
090101 
000400 


001224 
061230 


3 $0880 8 8800008000008 0 0086080050 00000008000000000000800080000000000 


i READ ROUTINE FOR THE MANUAL OPERATIONS 
39998008 0000000800 0000080800800 0000000000000000000000500000000008 
RDBLKs HOV OeBLKLIN,R2 sPICKUP THE BLOCK SIZE 
MOV OOPATTRN, RO sUSE THIS DATA PATTERH TO COMPARE TO 
MOVE @READ!GO,eTACS sSTART A READ 
183 WAITXFER sWAIT OW TRANSFER REQUEST 
BIT @READY, OTACS 918 READY SET? 
BNE 38 sBR IF YES 
DEC R2 sCOUNT THIS REQUEST 
BLT 26 sBR If TIME FOR ILBS 
MoV OTADB, Ri sREAD THE DATA BUFFER 
CMPB RO,R1 sCHECK THE DATA 
BEQ is s8R IF OK 
ERROR 5 sBAD DATA 
BR 4¢ sGET OUT 
28% BIs @ILBS,@TACS gREAD ILBS 
WAITREADY sWAIT OW READY 
38% TST eTacs sCHECK FOR ERROR 
BPL 48 3BR IF HONE 
ERROR 1 sERROR OCCURRED 
483 RTS pc sRETURN 


2 9988S 096080868 EEHO OOF 88ESSSHFHEOHS 00000000 08000058 080000000008 


] ROUTINE TO CHANGE DRIVES 
NXTORV: TSTB @SwWR 33S SWOT? ON A (1)? 
BMI as s8Rr IF YES 
CLR DRIVE sSET ORIVE TO *A* 
MOV OCORVPNT, Ri sGET DRIVE POINTER 
CmMPB CRI)De,0°A sIS If DRIVE *A"? 
BEQ ié s8r IF YES 
MOV CUNIT, DRIVE sSET ORIVE TO °B* 
183 TSsTB (R1) sLAST DRIVE BEEN SELECTED 
BNE a3 sBR IF NO 
MOV @ORVKEY,R1i sRESET DRIVE POINTER 
283 MOV Ri, @tORVPNT sSAVE DRIVE POINTER FOR NEXT TIME 
383 RTS pc 3G0 BACK 


F5 


2076 
2071 
2672 
2073 
2074 
2075 
2676 
2077 
2078 
2079 
2080 
2081 
2062 
2063 
2084 
2085 
2086 
2067 
2068 
2069 
2090 
2091 
2092 
2693 
2094 
2095 
2096 
2097 
2098 
2699 
2100 
2101 


010660 
010662 
010666 
0106760 
010674 
010700 
816702 
610704 
010706 
010712 
610714 
016720 
610722 
610730 
010732 
010740 
010742 
010744 
0107Se 
016752 
010756 


013761 
005011 
122710 
001402 
o52711 
032711 
601775 
005711 
100024 
032711 
001017 
032711 
001411 
122777 
001412 
122777 
001406 
000403 
032711 
001002 
062716 
000207 


TAI1 MANUAL INTERVENTION TEST 
OZTACC .WEW 


, 
‘ 
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ROUTINE TO CHANGE DRIVES 


3 000000000000000000000000000000000000000000000000000000000000000 


1 

eS8TTL ROUTINE TO EXAMINE DRIVE(S) FOR AVAILABLITY 

sCALLs 

i MoV OORVREY, RO 

’ JSR PC, COEXAN sRi 18 DESTROYED 

’ WORMAL RETURN 

’ ERROR RETURN 

EXAM: MOV OCTACSL, Ri sPICKUP THE "CONTROL & STATUS® REG, ADR, 
CLR cra) sORIVES*A", FUNCTIONS" urce 
Cups @°A, (RO) pEXAMINE ORIVE °A*? 
BEQ ie s0Rn IF YES 
BIs OUNIT, (Ri) sSELECT DRIVE *B° 

iss BIT @READY, (Ri) sWAIT OW READY 
BEQ 1s 
TST (Ri) sANY ERROR? 
BPL 4g s8R IF HO 
BIT OOPFLINWE, (R1) sERROR DUE TO °OFF LINE"? 
BNE 36 s8R IF YES 
BIT OWRTLOCK, (R1) sERROR DUE TO "WRITE LOCK*? 
BEO an s8R IF HO 

179210 CmMPB OBITO7IBITOO, CSUR s°READOWLY® SELECTED? (RDIPAS) 
BEQ 48 s0R IF YES 
170200 CuPB OBITOTIBITOIIBITOO,OSWR »(RDQPAS)? 

BEQ as s0r IF YES 
BR 36 STAKE THE ERROR EXIT ' 

283 BIT OLEADER, (R1) sERROR DUE TO “CLEAR LEADER*? 
BNE 4s s8R IF YES 

38% ADD 62.(SP) sTAKE ERROR RETURN 

463 RTS ec sRETURN 





G5 








2102 
2163 
2104 
2105 
2196 
2167 
2108 
2109 
21160 
2111 
2112 
2113 
2114 
2115 
2116 
2117 
2116 
2119 
2128 
2121 
2122 
2123 
2124 
2125 
2126 
2127 
2128 
2129 
2130 
2131 
2132 
2133 
2134 
2135 
2136 
2137 
2138 
2139 
21408 
2141 
2142 
2143 
2144 
2145 
2146 
2147 
2148 
2149 
2150 
2151 
2152 
2153 
2154 
2155 
2156 
2157 


010760 
010764 
010766 
6107708 
010772 
010774 
011000 
011002 
011604 
611006 
011610 
011014 
611016 
011622 
011024 
011030 
611032 
011034 
011036 
011640 
011044 
011046 
011052 
011056 
011060 


011064 
011070 
011072 
011076 
611102 


011104 
@11110 
@11114 
011122 
011124 


TAI1 MANUAL INTERVENTION TEST 
DZTACC NEW 


TYPE ROUTINE 


108767 
100082 


001350 
016746 


105366 
002770 
004767 
105367 
000770 


112716 
004767 
132767 
001372 
005726 


176173 


000056 
170100 


170670 
000001 


000032 
000072 


000040 
060014 
000007 


MAINDEC 11 -DZTAC oC 


MACY11 27(732) 


eS8TTL TYPE ROUTINE 
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F FSSSHSSSSSSSSSSSSSSSEHSSSHSHSHSCHSSHHHHHSHOSHSHOHHHSHHEHOHOHSCORO 

s®ROUTINE TO TYPE ASCIZ MESSAGE, MESSAGE MUST TERMINATE WITH A O BYTE, 

s@THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 

GNULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER, 
SFILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED, 

GFILLC CONTAINS THE CHARACTER TO FILL AFTER, 


s®1) USING A TRAP INSTRUCTION 


s@NOTEIs 

s@NOTE23 

geNOTE3s 

pe 

s@CALLe 

34 TYPE 

s°OR 

s@ TYPE 

ge MESADR 

TT) 

6TYPE: TSTB 
BPL 
HALT 
BR 

163 MOV. 
MOV 

283 MOVB 
BNE 
TST 

6083 MOV 

383 ADD 
RTI 

4638 CmMpB 
BEQ 
cmPB 
BNE 
TsT 
TYPE 
sCRLF 
CLRB 
BR 

583 JSR 

683 CMPB 
BNE 
MOV 

783 DECB 
BLT 
JSR 
DECB 
BR 


sHORIZONTAL TAB 


O83 MOVB 

983 JSR 
BITB 
BNE 
Tst 


6TPFLG 
a6 


38 

RO,°(SP) 
@2¢(SP),RO 
(RO), °( SP) 
68 


(SP)¢ 
(SP)¢,RO 
02, (38P) 


euT, (SP) 
88 

eCRLF, (SP) 
ss 

(SP) 


sCHARCNT 

28 

PC, STYPEC 
SFILLC, (SP) 
a4 
SNULL, ©( SP) 


1¢SP) 

68 

pC, STYPEC 
SCHARCNT 
78 


PROCESSOR 


e° .(SP) 
PC, STYPEC 
67,8CHARCNT 
98 

(SP)¢ 


seMESADR I6 FIRST ADDRESS OF AN ASCIZ STRING 


9318 THERE A TERMINAL? 

3eBR IF YES 

se9HALT HERE IF NO TERMINAL 

3s sLEAVE 

S36AVE RO 

39GET ADDRESS OF ASCIZ STRING 

93PUSH CHARACTER TO BE TYPED ONTO STACK 
9BR If If ISN°T THE TERMINATOR 

332F TERMINATOR POP If OFF THE STACK 
ssRESTORE RO 

ssADJUST RETURN PC 

3 RETURN 

s3BRANCH IF <HT> 


s7BRANCH IF NOT <CRLFD> 


33POP <CR><CLF> EQUIV 
ssTYPE A CR AND LF 


39CLEAR CHARACTER COUNT 

33GET WEXT CHARACTER 

33GO0 TYPE THIS CHARACTER 

3318 IT TIME FOR FILLER CHARS.? 
33IF WO GO GET NEXT CHAR, 

33GET @ OF FILLER CHARS, NEEDED 
39AND THE NULL CHAR, 

3;00E8 A NULL NEED TO BE TYPED? 
338R IF NO@-°GO POP THE NULL OFF OF STACK 
33GO TYPE A NULL 

33D0 WOT COUNT AS A COUNT 
33LOOP 


ssREPLACE TAB WITH SPACE 
seTYPE A SPACE 

s;BRANCH IF NOT AT 

33TAB STOP 

33POP SPACE OFF STACK 








TAI1 MANUAL INTERVENTION TEST 


DZTACC NEW 


2166 
2167 
2166 
2169 
2178 
2171 
2172 
2173 
2174 
2175 
2176 
2177 
2178 
2179 
2186 
2161 
2182 
2163 
2164 
2165 
2166 
2167 
2166 
2189 
21908 
2191 
2192 
2193 
2194 
2195 
2196 
2197 
2198 
2199 
2200 
2201 
2202 
2203 
2204 
2205 
2206 
2207 
2206 
2209 
2210 
2211 
2212 
2213 


011126 
011130 
011134 
011136 
011144 
011152 
011154 
011160 
011162 
011170 
#11172 
611174 
011176 


011200 
011206 
011210 
011214 
011216 
011222 
011226 
011232 
011234 
011242 


011244 
0112508 
011254 
011260 
011262 
011266 
011270 
011272 
011276 


611300 
011304 


TYPE ROUTINE 


600724 
108777 
100375 
116677 
122766 


022767 
001074 
105777 
100071 
117746 
042716 
022726 
001062 
126727 
001456 


104401 
104401 
016746 
164462 
104401 
005046 
005046 
105777 
100375 


117746 
042716 


021627 
o¢1005 
1044061 
062706 
000757 


170014 


000176 
167730 
167724 
177600 
000007 
167674 
011725 
011732 
166716 


011743 


167646 


167642 
177600 


011720 
000006 


MAINDEC -11-DZTAC eC 


170006 
000002 


167732 


STYPECs TSTB 


18s CuPB 


Ince 
SCHARCNTs ,WORD 
OTYPEX: RTS 





MACY11 27(732) 


as 

oeTPs 
6TYPEC 
2(8P),08TPB 
CR, 2( SP) 


is 
OCHARCUT 
6TYPEX 
eLF,2(8P) 
OTYPEX 
(PC) 

i) 

Pc 


eSBTTL TTY INPUT ROUTINE 


A ne - 
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99GET NEXT CHARACTER 
peWAIT UNTIL PRINTER 28 READY 


s3LOAD CHAR TO BE TYPED INTO DATA REG. 
$928 CHARACTER A CARRIAGE RETURN? 
ssBRANCK IF HO. 

29 YESeeCLEAR CHARACTER COUNT 

seExit 

9328 CHARACTER A LIWE FEED? 

ssSRANCH IF YES 

ssCOUNT THE CHARACTER 

ssCHARACTER COUNT STORAGE 


F POSSOSSSHSSHSSESHSSSSHSHOHHSHHHSSSSOSSOHEHSHHHHHEHHSHSHGHSSOHSOORG 


eENABL LSB 


FP OOCOCHSODEOOROEOOODSODOOCEOOOSHODSHOOOTOOUOODEDODEREROORDOOROE® 
s@SOFTWARE SWITCH REGISTER CHANGE ROUTINE, 

s@ROUTINE IS ENTERED FROM THE TRAP HANDLER, AND WILL 

s®SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CALL 
s@WHEN OPERATING IN TTY FLAG MODE. 


SCKSWRs CHP 
BNE 
TSsTB 
BPL 
MOVE 
BIC 
CMP 
BNE 
Cups 
BEO 


TYPE 
SGTSWR: TYPE 
MOV 
TYPoc 
TYPE 
CLR 
CLR 
78% * TSTB 

BPL 


MOVB 
Bic 


OSTKB, -( SP) 
0°C177, (SP) 
67,(SP)¢ 


eo SCNTLG 
o SMSUR 
SWREG, -( SP) 


o SMNEW 
(SP) 

°(SP) 

OsTKS 

78 


OSTKB, (SP) 
6°C177, (SP) 


(SP),625 


29238 THE SOFT-SWR SELECTED? 
gsBRANCH IF NO 

gsCHAR THERE? 

s9IF NO, DON’T WAIT AROUND 
ssGAVE THE CHAR 

ssSTRIPSOFF THE ASCII 

2338 IT A CONTROL G? 

3380, RETURN TO USER 

ssARE WE RUNNING IN AUTOeNODE? 
ssBRANCH IP YES 


ssECHO THE CONTROL@G (°G) 

ssTYPE CURRENT CONTENTS 

33GAVE SWREG FOR TYPEOUT 

33G0 TYPE**OCTAL ASCIICALL DIGITS) 


‘gsPROMPT FOR NEW SUR 


3sCLEAR COUNTER 
23THE NEW SUR 
93CHAR THERE? 

3eIF WOT TRY AGAIN 


ssPICK UP CHAR 
ssMAKE IT PeBIT ASCII 


3918 IT A CONTROL©UP? 
spBRANCH IF NOT 

39YE8, ECHO CONTROL-U (*U) 
sIGNORE PREVIOUS INPUT 
s9LET°S TRY IT AGAIN 


r5 





* 


TAI4 MANUAL INTERVENTION TEST 


DETACC NEW 


011466 


611462 
011464 
011472 
011476 
011500 
011506 
011514 
011522 
011524 
011530 
011532 
611536 
011542 
611546 
o115S0 
011552 
011560 


WAINDEC $11 -DETACoC 


TTY INPUT ROUTINE 


021627 


011646 
016666 
10$777 
100375 
117766 
042766 
026627 
001013 
108777 
100375 
117746 
042716 
622627 
001366 
000750 
026627 
002407 


000015 
000084 
000002 
600006 
001177 
167847 
000100 


177822 
000060 


000002 
177776 


001176 


167446 


167442 
177600 
000004 


167414 
167410 


177600 
000021 


167566 


000001 
167544 


006604 
000004 
08023 


1783 


1683 
eDSABL 


BR 
LSB 


___ ee 
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beg ie 


o SCRLF 
OINTAG, 04 
188 

0100, 08TKS 


PC, STYPEC 
cones 
i 


3(SP) 
©2( SP), (SP) 
76 


3928 IT A <CROP 


ssGRANCH IF HO 
ssYES, I6 If THE PIRST CHART 
s9BRANCH IF YES 


_ s9REENABLE TTY KBO INTERRUPTS? | 


SsBRANCH IF HOT 
seREENABLE TTY KOO INTERRUPTS 


ascii 
99TS THIS THE FinsT CHAR 
ssORANCH IF Yes 

3380, GHIFT PRESENT 

a8 CHAR OVER TO MAKE 


space In wWEwW CHAR 
39GET THE NEXT ONE 
seTYPE P<CRPOCLFD 
PISINULATE CONTROLEU 


3 9 98000006000000009 00000000000 0000 000000000000 0800000000000000008 
s@THIS ROUTINE WILL INPUT A OrecLs CHARACTER FROM THE TTY 


s CALL? 


RDCHR 

RETURN HERE 

MOV (SP) ,°( SP) 
MOV 4(SP),2¢SP) 
TSTB OsTKS 

BPL 16 

MOVB OSTKB, 4( SP) 
BIC 0°C<177>,4( SP) 
CMP 4(5P),623 
BNE a8 

TSTB OsSTKS 

BPL aa 

MOVB OSTKB, °(SP) 
BIC 6°C177, (SP) 
CMP (8P),021 
BNE 28 

BR is 

CMP 4(5P),0140 
BLT 4b 


sesINPUT A SINGLE CHARACTER FROM THE TTY 
ssCHARACTER 16 ON THE STACK 
seWITH PARITY BIT STRIPPED OFF 


29PUSH DOWN THE PC 
seSAVE THE PS 

ssWAIT FOR 

399A CHARACTER 

s9READ THE TTY 

33GET RID OF JUNK IF ANY 
9938 If A CONTROL@-S?P 
99BRANCH IF HO 

seWAIT FOR A CHARACTER 
s9LOOP UNTIL ITS THERE 
33GET CHARACTER 

geMAKE If 7-BIT ASCII 
3928 If A CONTROL-O? 
99IF WOT DISCARD IT 
ssYES, RESUME 

3918 If UPPER CASE? 
ssBRANCH IF YES 





J5 


cu 


TAI2 MANUAL INTERVENTION TEST 
TIY INPUT ROUTINE 


DZTACC NEW 


22708 
2271 
2272 


0115708 
611572 
011600 


011602 
011604 
011610 
011614 
011616 
011620 
011622 
011626 
611636 
011634 
011636 
611642 
011646 
611652 
011654 
011660 
011664 
011666 
011670 
011676 
011704 
011706 
011707 
011710 
011720 
011725 
011732 
011740 
011743 
011750 


011754 
011756 
011764 
011766 
011770 


026627 
603003 


042766 


010346 
612703 
022703 
101405 
104407 
112613 
122713 
001003 
104401 
000763 
111367 
104401 
122723 


105063 
104401 
012683 
011646 
616666 
012766 
000002 

0008 


600 
000010 
052536 

136 
005615 
020075 

048 
036440 


011646 
016666 
010046 
010146 
010246 


0117108 
011720 


000177 
001176 
@80044 
011706 
000015 
177777 
001200 


000004 
011710 


005015 
006507 
053523 

006 
047640 
000046 


600004 





> 
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MAINDECo1 1 -DZTAC eC 
600175 CMP 4(8P),0175 3918 If A SPECIAL CHAR? 
BGT 63 ssBRAWCH IF YES 
BACEO4 Bic 040,4(SP) ssMAKE If UPPER CASE 
463 RTI 33G0 BACK TO USER 
33 SHPSOSORHAFEDSPSLIFTFT IBS OHDGIGOHUTG SS GFSOHGSHOGEDOSESESE  HSSHODSSEBIEBOH 
tee ROUTINE WILL INPUT A STRING FROM THE TTY 
2 @CALL?: 
ge ROLIN ssINPUT A STRING FROM THE TTY 
ye RETURN HERE ssADDRESS OF FIRST CHARACTER WILL BSE ON THE STACK 
re PSTERMINATOR WILL BE A BYTE OF ALL 8°S 
SRDLIN: MOV R3,°( SP) s3SAVE R39 
1838 MOV OSTTYIN,RS 39GET ADDRESS 
263 CMP OSTTYINGO..R3 gsS8UPFER FULL? 
BLOS 6a 398R IF yes 
RDCHR 93GO0 READ OWE CHARACTER FROM THE T2Y 
MOVB (8P)¢,CR3) 33GET CHARACTER 
1063 Cups 0177, CR3) 2338 If A RUBOUT 
BNE 38 . e3SKIP IF NOT 
468 TYPE e SQUES gsTYPE A °R? 
BR is ssCLEAR THE BUFFER AND LOOP 
383 HOVB (R3),98 ssECHO THE CHARACTER 
TYPE 298 
Cups 015,CR3I)D¢ s9CHECK FOR RETURN 
BNE 28 s7LOOP IF NOT RETURN 
CLRB #1(R3) gsCLEAR RETURN (THE 13) 
TYPE eSLF seTYPE A LINE FEED 
MOV (8P)¢,R3 esRESTORE R3 
MoV - (8P),°C SP) gsADJUST THE STACK AND PUT ADDRESS OF THE 
@80002 MOV 4(SP).2(SP) 33 FIRST ASCII CHARACTER OW If 
006604 MOV OSTTYIN,4( SP) 
RTI 3 RETURN 
983 eSYTE 8 s9STORAGE FOR ASCII CHAR, TO TYPE 
eSYTE @ ss TERMINATOR ‘ 
6TTYIN: .BLKB 8. ssREGERVE 8 BYTES FOR TTY INPUT 
@0@ SCNTLUs ,ASCIZ /°U/<15><12> ssCONTROL *U* 
000012 SCNTLG: ,ASCIZ /°G/<1$><12> ssCONTROL *G* 
@20122 sMGWRs ,ASCIZ <15><¢€12>/8WR os / 
053505 sMNEWs ,ASCIZ / NEW s / 
eSBTTL READ AN OCTAL NUMBER FROM THE TTY 
3 POSSESS SSOGCHSSGCODHGGSOTIOTGSEG PIE GSTIDTSS OSS GSH VO SEGOSHOSHEGECOTDOG 
s@THIS ROUTINE WILL READ AN OCTAL (ASCII) NUMBER FROM THE TTY AND 
s@CHANGE IT TO BINARY, 
s*CALLs 
3 RDOCT #9READ AN OCTAL NUMBER 
92 RETURN HERE 33LOW ORDER BITS ARE ON TOP OF THE STACK 
pe ssHIGH ORDER BITS ARE IN SHIOCT 
SRDOCTs MOV (8P),°C SP) ssPROVIDE SPACE FOR THE 
000002 MOV 4(SP).-2(SP) ss INPUT NUMBER 
MOV RO, (SP) 39PUSH R@ ON STACK \ 
MOV Ri,°(8P) 33PUSH Ri ON STACK 
MOV R2,°( SP) 23PUSH R2 ON STACK 


K§ 





TAI1 MANUAL INTERVENTION TEST 
OZTACC .WEW 





MAINDEC©11eDETACoC 
READ AN OCTAL NUMBER FROM THE TTY 
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2326 11772. 1044610 188 RDLIN S3READ AW ASCIZ LINE 
2327 911774 612600 MoV (8P)o,RO 33GET ADDRESS OF 18ST CHARACTER 
2328 611776 905001 CLR Ri s3CLEAR DATA WORD 
2329 912008 905002 CLR R2 \ 
2330 612002 112046 283 MOVB = (RO) 4, © (SP) ssPICKUP THIS CHARACTER 
2331 612004 601412 BEO 36 $31 ZERO GET OUT 
2332 612006 606301 ASL Ri 3902 
2333 612010 0606102 ROL R2 
2334 612012 906301 ASL Ra 9904 
2335 612014 906102 ROL Ra 
2336 612016 965301 ASL Ri 3908 
2337 ©12020 006102 ROL R2 
2338 @12022 942716 177770 e pic 8°C7, (SP) s9STRIP THE ASCII JUNK 
2339 012026 962601 ADD (SP)¢,Ri $9ADD IN THIS DIGIT 
2348 0120360 600764 BR 28 3LOOP 
2341 012632 905726 368 TST (8P)¢ s9CLEAN TERMINATOR FROM STACK 
2342 012034 616166 00012 MOV Ri, 12(8P) s9SAVE THE RESULT 
2343 012040 610267 600010 MOV R2,6HIOCT 
2344 912044 012602 : MOV (8P)¢,R2 $9POP STACK INTO R2 
2345 012046 612601 MOV (8P)o,R1 p9POP STACK INTO Ri 
2346 612050 912600 MOV (8P)¢,RO 33POP STACK INTO RO 
2347 . 912052 890002 RII 3 sRETURN 
2348 612954 ssecee SHIOCT: ,wOrRD @ s9HIGH ORDER BITS GO HERE 
23ee eSBTTL BINARY TO OCTAL (ASCII) AND TYPE 
$3 
2351 FP SSSSHSSSSHSHSHSSSEHSSHHOSHESHSHSSHHHSSHHHSSHHESHHSHESHSOHSESOHSHOHES 
2352 s@THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY HUMBER TO A 6=DIGIT 
2353 s9OCTAL (ASCII) NUMBER AND TYPE IT, 
2354 S@STYPOS@eoENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 
2355 s@CALL3 
2356 ;e MoV NUM, ©( SP) ssWUMBER TO BE TYPED 
2357 30 TYPOS s3CALL FOR TYPEOUT 
2358 38 BYTE WN 39Nei TO 6 FOR NUMBER OF DIGITS TO TYPE 
2359 5 BYTE 39ei OR 6 
2360 1a s18TYPE LEADING ZEROS 
2361 0 $:@SSUPPRESS LEADING ZEROS 
2362 a8 
2363 s@STYPONeee-ENTER HERE TO TYPE OUT WITH THE SANE PARAMETERS AS THE LAST 
2364 s@STYPOS OR STYPOC 
2365 s#CALLE 
2366 30 MOV NUM, (SP) seNUMBER TO BE TYPED 
2367 3* TYPON s9CALL FOR TYPEOUT 
2368 38 
2369 S@STYPOCescENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 
2370 s*CALLS 
2371 re Mov NUM, =(SP) ssNUMBER TO BE TYPED 
2372 5 TYPOC s9CALL FOR TYPEOUT 
2373 
2374 12056 617646 900000 STYPOS: MOV 0(8P),°(SP) ssPICKUP THE MODE 
2375 @12062 116667 990001 000211 MOVE 1(8P),SOFILL  $33LOAD ZERO FILL swITCH 
2376 @12079 112667 900207 MOVB (8P)+,SOMODE*! j3;NUMBER OF DIGITS TO TYPE 
2377 @12074 62716 900002 ADD #2, (SP) ;7ADJUST RETURN ADDRESS 
2378 612100 990406 BR STYPON 
2379 12102 112767 06001 000171 $TYPOC: MOVB 01,86FILL 39SET THE ZERO FILL SWITCH 
2388 12110 112767 990006 600165 MOVB §6,80MODE+4 39SET FOR SIX(6) DIGITS 
2381 ©12116 112767 900005 000154 STYPON: MOVB 05,80CNT 39SET THE ITERATION COUNT 





x 


L5 








t 


2382 
2363 
2364 
2365 
2366 
2367 
2388 
2389 
2390 
2391 
2392 
2393 
2394 
2395 
2396 
2397 
2398 
2399 
24006 
2401 
2402 
2403 
2404 
2405 
2406 
2407 
2408 
2409 
2416 
2411 
2412 
2413 
2414 
2415 
2416 
2417 
2418 
2419 
2420 
2421 
2422 
2423 
2424 
2425 


012124 
012126 
012130 
012132 
012136 
012140 
012144 
0121508 
012154 
012160 
012162 
012164 
012166 
012170 
012172 
012174 
012176 
012200 
012204 
012206 
012212 
012214 
012216 
012220 
012222 
012226 
012232 
012236 
012242 
012246 
012250 
012252 
012254 
012256 
012260 
012262 
012264 
012272 
012274 
012276 
012277 
012300 
012301 
012302 


TAI1 MANUAL INTERVENTION TEST 
DZTACC NEW 


MAINDEC*11-DZTAC oC 


BINARY TO OCTAL (ASCII) AND TYPE 


010346 
010446 
610546 
116704 
005404 
062704 
110467 
116704 
016605 
005003 
006105 
000404 
066165 
006105 
0806105 
610503 
006103 
108367 
100016 
042703 
001002 
605704 
001403 
005204 
052703 
052703 
110367 
164401 
105367 
003347 
002402 
005204 
000744 
012605 
012604 
012603 
016666 
012616 
000002 

000 

000 

000 
. 008 
000000 


060006 ¢ 


000076 
177770 


060060 
00004e 
000040 
012276 
000032 


090002 0800004 


MoV 
MOV 
MOV 
MOVB 
NEG 


483 
58s B1s 
MOVB 
TYPE 
DECB 
BGT 
BLT 
INC 
BR 
MOV 
MOV 
MOV 
MOV 
MOV 
RTI 
BYTE 
oSYTE 
sOCNTs ,BYTE 
SOFILL: ,BYTE 
SOMODE: ,WORD 


783 
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R3,°C(SP) 
R4,°( SP) 
RS,°( SP) 
GOMODEC1, R4 
RG 

66,R4 
R4,80MODE 
GOFILL, R4 
12¢(8P),RS 
R3 


(SP)¢,R5 
(SP)¢,R4 
(SP)¢,R3 
2(8P),4(SP) 
(8P)4, (SP), 


ee ee 
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se6AVE RI 
s3SAVE RG 
sesSAVE RS 
ssGET THE NUMBER OF DIGITS TO TYPE 


ssSUBTRACT IT FOR WAX, ALLOWED 
ssSAVE IT FOR USE 

s3GET THE ZERO FILL SwiTCH 
ssPICKUP THE INPUT NUMBER 
ssCLEAR THE OUTPUT WORD 
ssROTATE MSB INTO °C* 

3360 DO NSB 

ssFORM THIS DIGIT 


93GET LSB OF THIS DIGIT 
seTYPE THIS DIGIT? 

398R IF NO 

33GET RID OF JUNK 

ssTEST FOR 6 

ssSUPPRESS THIS 0? 

23BR If YES 

39D0N°T SUPPRESS ANYMORE 0°S 
geMAKE THIS DIGIT ASCII 
gsMAKE ASCII IF NOT ALREADY 
s3SAVE FOR TYPING 

33GO TYPE THIS DIGIT 

ssCOUNT BY 1 

33BR IF MORE TO DO 

33B8R IF DONE 

ssINSURE LAST DIGIT ISN°T A BLANK 
33G0 DO THE LAST DIGIT 
seRESTORE RS 2 
ssRESTORE R4 

ssRESTORE R3 

93SET THE STACK FOR RETURNING 


3 sRETURN 

ssSTORAGE FOR ASCII DIGIT 

s7 TERMINATOR FOR TYPE ROUTINE 
ss0CTAL DIGIT COUNTER 

33ZERO FILL SWITCH 

se9NUMBER OF DIGITS TO TYPE 








2426 
2427 
2428 
2429 
2430 
2431 
2432 
2433 
2434 
2435 
2436 
2437 
2438 
2439 
2440 
2441 
2442 
2443 
2444 
2445 
2446 
2447 
2448 
2449 
2450 
2451 
2452 
2453 
2454 
2455 
2456 
2457 
2458 
2459 
2460 
2461 
2462 
2463 
2464 
2465 
2466 
2467 
2468 
2469 


012304 
012306 
012312 
012314 
012316 
012320 
012324 


012326 
612330 
012336 


012346 
012342 
012344 
012346 
012350 


012354 
012356 
012360 
012362 
012364 
012366 


TAI1 MANUAL INTERVENTION TEST 
DZTACC NEW 


TRAP DECODER 


010046 
616600 
005740 
111000 
006300 
016000 
000200 


611646 
016666 
000002 


012326 
010760 
012162 
012056 
012116 


011200 
011462 
011602 
011754 
006630 
606734 


012340 


~— 
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»SBTTL TRAP DECODER 


FP PPPSSSSSHHHSSSHOHOSESESESSSHSHOSOHESSOHHSSEESSSO HS HEHSOCRSCOESS 
s#THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE “TRAP® INSTRUCTION 
s?AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
3 *0F THE DESIRED ROUTINE, THEN USING THE ADDRESS OBTAINED IT WILL 
3#GO TO THAT ROUTINE, 


STRAP: MOV RO, °( SP) s7SAVE RO. 
MOV 2(8P),RO 33GET TRAP ADDRESS 
TST (RO) s7BACKUP BY 2 
MOVB (RO) RO 33GET RIGHT BYTE OF TRAP 
ASL Re s3POSITION FOR INDEXING 
MOV STRPAD(RO),RO 33 INDEX TO TABLE 
RTS RA #360 TO ROUTINE 


ssTHIS IS USE TO HANDLE THE "GETPRI" MACRO 


STRAP2: MOV (SP),°CSP) #sMOVE THE PC DOWN 
MOV 4° °P)e2(SP) s;MOVE THE PSW DOWN 
RTI ssRESTORE THE PSW 


eSBTTL TRAP TABLE 


s@THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
s@BY THE “TRAP* INSTRUCTION, 


3 ROUTINE 
3 SeOSSSSe 
STRPAD: ,WORD STRAP2 
STYPE 3 ;CALL#TYPE TRAP#1(104401) TTY TYPEOUT ROUTINE 


STYPOC ;;CALLeTYPOC TRAP*2(104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
STYPOS ssCALLsTYPOS TRAP*3(104463) TYPE OCTAL NUMBER (NO LEADING ZEROS) 
STYPON  ;3CALLSTYPON TRAP*4(104404) TYPE OCTAL NUMBER (AS PER LAST CALL) 


SGTSWR 3;CALLEGTSWR TRAP*S(104405) GET SOFT@SWR SETTING 


SCKSWR 3 ;CALLeCKSuP TRAP*6(104406) TEST FOR CHANGE IN SOFT-SWR 

SROCHR 3sCALLSRDCH2 TRAP+7(104407) TTY TYPEIN CHARACTER ROUTINE 

SRDOLIN 3 ;CALL@RDLIN TRAP*10(104410) TTY TYPEIN STRING ROUTINE 

SROOCT ;;CALLeRDOCT TRAP*11(104411) READ AN OCTAL NUMBER FROM TTY 

WAIT.ON READY s sCALLSWAITREADY TRAP12(104412) WAIT ON THE READY BIT TO 
WAIT, FOR, XFER ssCALLEWAITXFER TRAP+13(194413) WAIT ON XPER REQ, 





ee 





2476 
2471 
2472 
2473 
2474 
2475 
2476 
2477 
2478 
2479 
2486 
2481 
2462 
2483 
2484 
2485 
2466 
2487 
2468 
2469 
2496 
2491 
2492 
2493 
2494 
2495 
2496 
2497 
2498 
2499 
2590 
2501 
2502 
2503 
2504 
2505 
2506 
2507 
2506 
2509 
2510 
2511 
2512 
2513 
2514 


- 


012370 
012376 
012404 
012406 
012410 
012412 
012414 
012416 
012420 
012424 
012430 
012436 
012440 


012442 
012450 
012454 
012460 
012464 
012466 
012472 
012474 
012476 
012500 
012502 
012504 
012506 
012514 
012522 
012524 
012526 
012530 
012532 
012534 
012536 
012540 
012542 
012580 


612737 
612737 
016046 
010146 
010246 
010346 
010446 
010546 
017746 
010667 
012737 
000000 
600776 


012737 
016706 
005067 
005267 
001375 
012677 
012665 
012604 
012603 
012662 
012601 
012600 


TAI MANUAL INTERVENTION TEST 
DZTACC ,WEW 


166814 
000118 
012442 


012370 
000340 


047520 


MAINDEC 11 -DZTAC-C 
POWER DOWN AND UP ROUTINES 


eSBTTL POWER DOWN AND UP ROUTINES 


000024 
000026 


000024 


000024 
000026 


042527 


i 


MACY11 27(732) 11-JUN-76 13:81 PAGE $4 


ORCS SSE 
sPOWER DOWN ROUTINE 


SPWRON: MOV 
MOV 


PI SSFHSHFHHGHOGGGHEGSSEHOEHGFTOHHTEGFSGSESPDO VHS HHSOSH SMHS EHLESTIBOVODS 


OCILLUP,OOPWRVEC 3;SET FOR FAST UP 
0346,CGPURVECS2 33 PRIOS7 


RO, °( SP) ePUSH RO ON STECK 
Rie-( SP) 33PUSH Ri OW STACK 
R2,°( SP) 3sPUSH R2 ON STACK 
R3,°( SP) 37PUSH R3 OW STACK 
R4,°( SP) s9PUSH R@ OW STACK 
RS, °(SP) sePUSH RS OW STACK 
OSWR, (SP) ' p9PUSH OSWR OW STACK 
SP, SBAVRE S3SAVE SP 

OSPWRUP, OOPWRVEC 3;3SET UP VECTOR 

o°2 73HANG UP 


SPWRUP: MOV 


SILLUPs HALT 
SSAVR6: 


® 
SPOWER: .ASCIZ <15><12>"POWER® 
EVEN 


OSILLUP,OOPWRVEC 3;SET FOR FAST DOWN 


@T3AVRG6,SP 33GET SP 

SSAVRE s;WAIT LOOP FOR THE TTY 
OSAVRG sesWAIT FOR THE INC 

18 3;0F wORD 

(SP), O8WR 39?70P STACK INTO OSUR 
(8P)¢,R5 37PO0P STACK INTO RS 
(SP)o,R4 33POP STACK INTO Re 
(SP)¢,R3 33POP STACK INTO R3 
(SP)¢,R2 37P0P STACK INTO RQ 
CSP)o,R1 2380P STACK INTO Ri 
(SP)4,RO 33POP STACK INTO RO 


SSPWRON,COPWRVEC 9;3SET UP THE POWER DOWN VECTOR 
0340, O09PURVECO2 3 3PRIOS? 
sREPORT THE POWER FAILURE 


SPOWER s7POWER FAIL MESSAGE POINTER 
(PC), (SP) ssRESTART AT PUREST 
PURST ssRESTART ADDRESS 


33THE POWER UP SEQUENCE WAS STARTED 
72 33 BEFORE THE POWER DOWN WAS COMPLETE 


$3PUT THE SP HERE 


SEQ 6067 








La 


TAI1 MANUAL INTERVENTION TEST 


DETACC ,WEW 


25¢5 
2516 
2517 
2516 
2519 
2520 
2521 
2322 
2523 
2524 
2525 
2526 
2527 
2528 
2329 
2530 
2531 
2532 
2533 
2534 
2535 
2536 
2537 
2538 
2539 
2540 
2541 
2542 
2543 
2544 
2545 
2346 
2547 
2548 
2549 
2556 
2551 
2552 
2553 
2554 
2555 
2556 
2557 
2558 
2559 
2568 
2561 
2562 
2563 
2564 
2565 
2566 
2567 
2568 
2569 
2578 


012582 
6123560 
012566 
012574 
012576 
012604 
012666 
012614 
012626 
012626 
012634 
012635 
012642 
012646 
012654 
012661 
012666 
012667 
012674 
012762 
012710 
912714 
012722 
012730 
012732 
012740 
012746 
012754 
012762 
012770 
012776 
013000 
013006 
013014 
013021 
013026 
013034 
013040 
013046 
013054 
013061 
013066 
013074 
0131080 
013106 
013114 
013122 
013126 
013134 
013142 
013150 
013156 
013164 
013167 
013174 
013202 


047522 
040514 


044522 
037451 
040524 


047511 
000077 
051503 
042161 


042526 
@0ee75 
044522 
636531 
047412 


051505 
042527 
047127 


000060 
042527 
@S2040 


647515 
051501 
020165 
042640 
052440 
0520408 


046120 
040503 
642524 
052105 
042524 
000113 
020124 
020105 
642514 
040524 
051120 
000115 
040505 
040506 
052040 
000:24 
640522 
020122 
051505 
644501 
047524 

000 
042510 
043516 
020107 





MAINDEC $11 -DZTAC@C 
042526 NSGDRV: ,ASCIZ 
000040 
@513503 MSGASK: ,ASCIEZ 
OSi117 MSGVEC: .ASCIZ 
044522 MSGPRIs. ,ASCIZ 
@00075 MTACS: ,ASCIZ 
636502 ATADB: ,ASCIZ 
@52103 MTAVECs ,ASCIZ 
OS51117 MTAPRIs ,ASCIZ 
000 
@37513 MSGOK: .ASCIZ 
000260 NYES: eASCIZ 
026122 MTUPWR: ,ASCIZ 
052040 
@20122 MPWRUPs ,ASCIZ 
033125 
042526 HOFFLN: ,ASCIZ 
042523 
051106 
044522 
042116 
051505 
041501 MTAPE: ,ASCIZ 
051523 
000 
053440 MWRTLKs .ASCIZ 
046640 
@51127 MLAST: ,.ASCIZ 
047105 
000 
052524 EMis eASCIZ 
041117 
054504 EM2: eASCIE 
046111 
@20117 
@51516 EM3:s eASCIZ 
042522 
021124 
042514 
051440 
053440 EM4: eASCIZ 
043040 
042523 
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<CRLF>*DRIVE(S)? ° >? 
<15><12>/TACS?/ 

/VECTORT/ 

/PRIORITY?/ 


/TACSS/ 
4 TADBSs/ 


4 VECTORS/ 

4 PRIORITYs/ 
<15>¢€12>/0K?/ 
/YES/<CRLFD 
/POWER DOWN TUGO/ 
/POWER UP TU6G/ 


/REMOVE CASSETTE FROM DRIVE UNDER TEST/ 


/REPLACE CASSETTE/ 
/SET WRITE LOCK/ 
/SET WRITE EWABLE/ 
/STATUS PROBLEM/ 


/*READY" FAILED TO SET/ 


/*TRANSFER REQUEST" FAILED TO SET/ 


/THE WRONG FLAG SET/ 








» 


TAI1 MANUAL INTERVENTION TEST 
DZTACC NEW 


2571 613218 0600124 

2572 @13212 940504 640524 
2573 613228 647522 0646162 
2574 013226 eee 

2875 0613227 128 06201063 
2576 613234 820040 652040 
2577 613242 9600123 

2578 013244 641520 920040 
2579 613252 620040 040524 
2588 013266 620040 620040 
2581 613266 952111 6404640 
2582 613274 0642522 051523 
2563 613301 128 620103 
2584 613306 620040 06520408 
2585 013314 6260123 0620040 
2586 613322 950130 041505 
2587 613330 0651048 0653103 
2588 013336 000 

2589 013340 

27598 613340 0601116 601162 
2591 613346 0601116 0601162 
2592 613354 98900800 

2593 613356 0601116 001162 
2594 613364 9801126 seecee 
2595 613378 81116 601206 
2596 

ees 013376 601116 eseece 
259 

2599 013402 640524 630461 
2600 613410 6445801 0642514 
2601 013416 647524 0651040 
2602 613424 647528 642116 
2603 613431 116 6620117 
2604 613436 653111 620105 
2605 013444 644501 640514 
2606 613452 900105 

2607 613454 641528 920040 
2608 013462 6200940 640524 


2609 0613470 600 
2618 613471 128 000103 
2611 000001 


MAINDEC “1 1-DZTAC oC 


050040 
046505 


020040 
051503 
040527 
042104 

oee 
020040 
041501 
042440 
020124 
042047 


000000 
001262 
001124 
000000 


043040 
620104 


020040 
051503 


POWER DOWN AND UP ROUTINES 


eEVEN 
OTis 
DT23 
OTs: 
OT2018 
DT202:8 


eASCIEZ 


WORD 
e WORD 
e WORD 
eASCIZ 


eASCIZ 


eASCIZ 
END 
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JDATA PROBLEN/ 


7PC TACS/ 

7Pc TACS WAIT ADDRESS/ 
7PC Tacs ExPECT RCV°Ds 
GERRPC, GRECO, 0 

SERRPC, SREGO, SAVPC,0 

GERRPC , SREGO, SGDDAT, SBDDAT, © 
SERRPC, TACSL,O 

SERRPC,@ 


*TA11 FAILED TO RESPOND* 


"NO DRIVE AVAILABLE® 


7Pec TaAcs/ 


4PC/ 


De 





oe a et ee ne 








~) 
TALL MANUAL INTERVENTION TEST  MAINDEC11-DZTAC-C MACY11 27(732) 12-JUN©76 13:51 PAGE SO Sto 9070 
@ DETACC NEW CROSS REFERENCE TABLE ©- USER SYMBOLS 
ASKADR 007146 $56 = 16928 
e ASKORY 007636 $53 16600 = 1683 
ASKKEY 901232 398@ 6430) = 673 
ASKQUE 0907436 731 789 803 018 ees) = 1392 17608 
re) BEGINX 601730 234 sses = 806 see 636 638 
BECIN1 601326 231 4698 
BEGIN2 9091360 232 4768 
@ BEGINS 001366 233 478 4700 
BEGING 901374 ange 
BCHCKN 901400 472 474 477 479 ae1e 
fay BIT® = 900001 1666 
BITe® © 909001 1560 6166 208 8=— 28093-2095 
BIT#1 = 690002 1sse 0-165 207 = - 2098 
@ BITe2 = ee0ee4 1840) 164 206 
BITO3 = 900010 1830 §=— 163 205 
BITO4 © 990020 1$2@ §©= 162 204 
8 BITS = 900040 131@ 9) 161 203 
BITS © 900100 1see = 160 202 
BITO? = 990200 1498 = 189 201 892093 2098 
e BITOS = 900400 1400 = 188 200 = 1478 
BITS9 = 961000 1478) = 487 199 «61466 880 
BIT! = 999002 1658 
@ BITIo = 902000 1460 «= 198 1834 
BITI1 = 9e4e09 145¢ = 197 1493 
BITI2 = 910000 1448 = 196 
@ BI713 = 920000 143@ «= 195s 844 
BITI4 = e4e000 1420 «194 1464 
BIT:S © 199000 141@ = 193 os4 
@ BIT2 = 998004 1640 
BIT3 = 990010 1638 
BIT4 = 900020 1629 
& BITS = 990040 1618 
BIT6 = 900100 1600 
BIT? = 900200 1598 
8 BITS = 900400 1508 
BITS = 901600 1578 
BLKLIM 010462 1997@ 2011¢ 2018 2035 
@ BPTVECs 900014 1736 
BSBG = 900010 1869 §= 768 921 961 1021 1061 1113 1153 1213 ©1283 
BSFG = 900006 185¢ = (760 916 956 1016 1056 «61108 = 148) = 1208S 1248) = 1974 
o BSFCSB 010320 241 «19718 §©61972 1979 
CHKADR 01752 $52 555 748 
CHKDRY 0902032 6128 
@ CKSUR = 104406 1463 1526 1549-24648 
cR 8 990018 sie §=62162 0.2172 
CRCERRS 649080 1940 «= 997: 1089 
@ CRLF = 990200 e200 53802133) -2172)s 2818-2832 
CURDRY 901234 3968 §=— 6668 = 667 
DDISP = 177870 ese = 364 509 
a DHi 013227 417 «=. 25758 
DH2 @13244 423 429 435 «=. 25788 
DH2e01 013454 449 «= 26078 
e DH202 | @13471 454 «= 26108 
DHS 013301 441-2838 
DISPLA 901142 3649 «= $098 )=s S17® «=61507© = 18338 
@ DISPRE 000174 2200 = $17 
EG 
.¢) 








TAI1 MANUAL INTERVENTION TEST 


*) 
i) ozTacc NEW 
DRVKEY 0601224 
© DRVPNT 601230 
DSWR ses 177576 
ori 013340 
e oT2 013346 
OT201 613370 
DT202 013376 
@ oTs 013356 
EMTVECs 000030 
EM 013061 
@ eM2 013100 
EM2@4 013402 
EM202 013431 
& EM3 913126 
EM4 013167 
EMS 013212 
@ ERROR 8 100000 
ERRVECs 966004 
EXAM 010654 
& exit 067136 
FGAP s 604060 
FUNCTIs 600016 
@ FUNC® = 660062 
FUNC1 s 6990004 
FUNC2 = 600010 
So GNS BS SGeees 
GO S&S 000001 
@ 
e GTSWR s 104405 
HERE 001730 
@ HGHTIM 6606706 
uT s 600011 
ILBS 2s 909920 
@ INT.ENS 9600100 
IOTVECs 660020 
ITEMS2 001306 
a LEADERs 620000 
LF s 600012 
fe LOOP 007062 
LOOP’ 000500 
LOOP2 800600 
e LOOP3 698700 
MANUAL 002152 
MAXCNT 006732 
@ MLAST 013040 
MOFFLN 0612732 
MPWRUP 612714 
oS MSGASK #12566 
MSGDRVY 612552 
MSGID 001702 
& MSGOK 012661 
38 


CROSS REFERENCE TABLE o¢ USER SYMBOLS 


MAINDEC o41 -DETAC-C 
394 4760 612 625 646 671 16616 
6268 6460 657 6728 2d61 20666 
363 508 
25900 
430 436 25910 
25986 
25970 
25930 
4920 4930 
25558 
25580 
259986 
26038 
25628 
25686 
2572¢ 
506 Seve $18¢ S740 §$66a 1469 14760 
617 622 20600 
16640 
1909 1189 
209 
2069 
209 
$37 664 719 723 1776 1764 2457 
2466 2467 2468 2469 
303 366 325 328 68s 702 704 
778 760 637 045 6S6 065 869 
1262 12864 1268 1293 1305 1308 1326 
1360 1378 1360 1397 1410 1613 1616 
1955 1956 1974 2019 2037 
679 1989 2002 2008 246280 
$25 $36 536¢e 
16030 1617¢ 
2131 2172 
652 663 676 99S 1165 1286 1312 
49008 49ie 
697 10869 1365 1363 18618 1649 1672 
20986 
2166 2172 
4681 
292 
312 
334 
6400 
706@ 7070 7006 7098 1603 16248 1631 
25520 
25398 
25368 
2517¢ 
2515¢ 
536¢e 645 
253080 


14720 


2458 
745 
692 


147Se 


2459 
780 
9a9 


1907 
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788 
991 
1337 
1699 


2667 


2462 
769 
1103 


2027 


768 
1183 


1927 


2048 


Fl 





MSGPRI 
MSGVEC 
MTACS 
MTADB 
MTAPE 
MTAPRI 
MTAVEC 
MTUPWR 
MWRTLK 
MYES 
WEXT 
NOTA 
nots 
NOTLGL 
NXTORV 
OFFLINS 


PR6 

PR? 

PS 

PSwW 
PWRST 
PWRVECs 
ROBLK 
RDOCHR 8 
RDOLIW s&s 
RDOCT 8 
ROSUB 
READ 28 


vo 

Zz 

C7 
S@®eaaeaeananan 


RESVECs 
REWINDs 


RGPBLK 
SAVPC 
SAVPS 
seTaur 
sFaG s 
SFFG s 
SFFGSB 
STACK s 
START 
STKLMTs 
SWR 


612606 
012576 
012620 
012626 
013000 
012646 
012635 
012674 
013021 
012667 
007116 
607074 
007106 
007130 
010616 
001000 
002164 
010464 
4177772 
000246 
000000 
000040 
000100 
000140 
000200 
000240 
000300 
000349 
177776 
177776 
002172 
000024 
010530 
104407 
104410 
164411 
007756 
008004 


600040 


010140 
061202 
001204 
010352 
600014 
000012 
010234 
001100 
002204 
177774 
001140 


TAI’ MANUAL INTERVENTION TEST 
DETACC ,NEW 


1716 
1767 
1728 
1731 
619 
1737 
1734 
732 
086 
1749 
1676 
1668 
1672 
1665 
1011 
1998 
641 
19966 
C68 
1000 
1030 
1049 
1058 
10686 
1078 
1068 
1098 
1168 
630 
O48 
6458 
1788 
1671 
1741 
1662 
1694 


25216 
25198 
25230 
25246 
25460 
25260 
25268 
25330 
25498 
25320 
1674 
16710 
16788 
1676 
1843 
737 
6438 
2004¢ 


16766 


16828 
1866 
795 


MAINDEC $11 -DETAC@C 
CROSS REFERENCE TABLE o- USER SYMBOLS 


1685 
1897 
6e9 


24740 
24658 


24678 
1873 
911 
1339 
326 
2065 


685 
1228 
18699 
1932 
1621 
1634e 


971 
966 
1963 
1638 


2475@ 


951 
1343 
333 


702 
1266 
1927 
1936 
16328 
1648 


1861 


1953 
Boa 


991 
2037 
686 


780 
1282 
1955 
1633 
1071 
1066 


MACY 27(¢732) 


1011 
1607 


637 
1305 


$i6¢e 





—— 
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1400 ©: 2089 
2502® 250360 
1051 11030-19430 4830 12030): :243 
1637 10160 1846S 8690S 1988 = 1928 
092 936 976 909 §©61036 =: 1076 
1326 1337 1388 ©4370 «©1397 «= 148 
2591 
1163 1223 1263 1208 ©1933 
1158 1187 «1218020258298 
1948 
$30 677 1464S (s«478)0— ss e8e 1486 


Gl 
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TAI’ MANUAL IWTERVENTION TEST AINDECe14 1 oDETAC eS MACY11 27€732) ifeJUN-76 13351 PAGE 61 Ste 6673 | 
re] DZTACC NEW CROSS REFERENCE TABLE oo USER SYMBOLS “a 
1493 1334 1541 1846 1856 1987 1991 1993 2008 2064 2006 2656 2093 
& ‘ 2095 2162 2219¢ 2482 24958 
SWREG 0600176 2298 $16 $306 677 1967 2008 2066 2162 21958 
swe 4 6s 900001 1388 
oO svee s 080001 120¢ 138 
SWei s 680002 127¢@ 137. % 
SW02 s 980004 126¢@ 136 
a) 8ue3 s 980010 125¢@ 135 
sve4 s 900020 12486 134 
swes s 9090040 1230 133 
@ SWO6 s 000100 1228 132 
Swe? s 906200 121¢ 431 
svee s 600400 1208 130 
oi sveo ss 901000 1198 129 
SWL 8 800062 137¢ 
swie® s 662000 116¢ 
a swii s 904000 117¢ 1787 
swi2 s 910000 116¢ 
swi3 es 620000 1156 
Pes) swi4 s 040000 1148 
swiS s 100000 1130 
SH2 3s 900004 1368 
e@ 8H3 8 000010 1350 ; 
SHG Bs 869820 1348 
Sus s 900040 1338 
e SHG s 600100 1329 
sw? 8 000200 i310 
SHe 8 600400 1308 
fe) Sud s 001000 1298 
TACSH 001210 300¢ 1762e 17036 
TACSL 0601206 asad $76 650 16996 1762 1729 1607 1639 18662 1693 1921 1949 2080 
s 
© TADBH 001214 3908 170Se 17060 
TADBL 661212 3890 651 17018 1705 1732 1808 1640 1063 1694 1922 1986 
o TAPRIO 06601222 392¢ 1727¢ 1738 
TAVEC 0601216 3918 473 647¢ 648e 1713¢ 1715¢ 1735 
TBITVEs 900014 i7ie 
gS TORV 602274 659 6618 
TIMERRs 902000 198¢@ 1089 
TKVEC s 906060 1788 
3 TPVEC s 600064 179¢@ 
TRAPVEs 600034 1778 494e 4956 
TRIVECs 900014 1728 
ie) TR,REQs 600200 2018 
TsTi 002422 663 6968 
TSTi® #603224 866 621 625 6300 
a TSsTii 003422 e610 
TST12 603772 ea4 9848 
TsTi3 004332 906 10846 
@ TST14 604644 1086 117608 
TSsT1iS 605266 1178 12768 
TSTi6 005362 1279 13218 
@ TsT17 605500 1323 13510 
TSsT2 002502 699 7130 
T8T20 005564 1354 1366 13718 
@ T8T21 005642 1374 1304 13698 


Hi 


TST22 
TsT3 
TsT4¢ 
TsTts 
TSsTé6 
Tst7 
TYPE se 


TYPERR 
TYPOC se 
TYPO" s 
TYPOS s 
UNIT s 
WAITREs 


WAITXFs 


WAIT.F 
WAIT,O 
WAIT 
WAIT2 
WAITS 
WAIT4 
wFG ts 


WwFGSUB 
WGBLOP 
WGPBLK 
WLOOP 

WRITE s 


WRTBLK 
URTLOCs 


WRTSUB 
saUTOB 
SBDADR 
SBODAT 
SBELL 

sSCHARC 

sCKSwWR 
SCMTAG 
scmi_ os 
scu2 s 
s6CM3 8s 
SCNTLG 
sCNTLU 
sCRur 


DZTACC NEW 


005716 
002646 
062714 
003062 
003120 
003164 
164401 


006512 
104402 
104404 
104403 
600406 
104412 


006734 
006636 
006660 
606780 
006714 
006676 
608000 


007604 
016042 
010036 
007674 
000002 


0076708 
001134 
001122 
001126 
001172 
@1117¢4 
011200 
001100 
000002 
000004 
008002 
011725 
011720 
001177 


TAI MANUAL INTERVENTION TEST 
CROSS REFERENCE TABLE o- USER SYMBOLS 


006 
716 


667 
1594 
1763 
2289 


1736 


2084 
781 
998 

1327 

1398 
862 

24696 


MAINDEC 11 -DETACoC 

1461 14068 
7286 

7438 

782 7076 
796 e016 
6168 

645 662 
1982 1586 
1747 1749 
2221 2240 
1566¢ 

1730 1733 
660 2064 
70S 746 
877 893 
1313 1315 
1379 1301 
051 6s? 
2026 2038 
2469 
2468 

1615 1618 
16146 

1612 16268 
1613¢ 

704 745 
1399 1616 
1s06¢ §61816 
1896 1910 
16918 

1642 18652 
306 7808 
1293 1386 
1906 20168 
902 907 
1067 1072 
1204 1209 
18376 

5348 2190 
1530e 2593 
1536 1562 
21488 8§=©62155 
2464 

483 404 
3760 3778 
3768 3778 
375 
23068 
23058 

668 1544 
1436 1442¢ 
589 639 


668 
1660 
1764 
2292 


1739 


736 
996 
1331 
1413 
670 


917 
1094 
1219 
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717 
1682 
1774 
2296 


761 
1182 
1334 
1017 

075 


941 


1577 


721 
1693 
1779 
2409 


766 
1186 
1336 
1963 

992 


927 
1104 
1229 


1434 
1707 
1782 
24578 


771 
11668 
1338 
1934 

994 


1041 


932 
1109 
1408 


1536 
1716 
1706 
2504 


776 
1283 
1342 
1959 
diad 


937 
1114 
2691 


1763 


1544 
1720 
2136 


7194 
1267 
1347 
1978 
1265 


1768 


1566 
1731 
2193 


$18 
1289 
4357 
2026 
1311 


1047 
1124 


2137 


1578 
1734 
2194 


2172 





SEQ 0076 


1877 
1737 
2197 


1087 
1194 


ré 


TAI1 MANUAL INTERVENTION TEST 
DETACC .WEW 


SENDCT 
SENDNG 
sENULL 
stop 

storct 
SERFLG 
SERMAX 
sERROR 
sERRPC 
SERRTB 
sERTTL 
SESCaP 


SLPADR 


SLPERR 
SMAIL 8 
sMNEW 
SMSUR 
SMXCNT 
SNULL 
sNuTsTs 


sOcnt 
sOMODE 
sOVER 
6PASS 
SPOWER 
6PWRAD 
SPWRDON 
SPWRNG 
SPWRUP 
SQUES 
SRDOCHR 
SRODECs 
SROLIN 
sRo0CT 
SRDSZ s 
SREGAD 
SREGO 
SREGi 
ORTNAD 


@®eeeeee#eeee@ee@e?ee?dse#eeeeeseees @ 
ee 
a 
=| 


005774 
066033 
006030 
065740 
005766 
001103 
001115 
006320 
001116 
001236 
001112 


001170 


001110 
FEO REE 
611743 
011732 
006316 
001154 
006601 


012300 
012302 
006302 
001100 
012542 
012530 
012370 
012524 
012442 
001176 
011462 
eoeeee 
011602 
011754 
000016 
001160 
001162 
001164 
006026 


ier] 
1434 
14486 
1422¢ 
4908 
3468 
3528 
492 
3530 
4110@ 


14328 
144686 


14290 
1453 
$o0i8 
1352S¢e 
15380 
1573 
1837e 
5008 
1555 
2141 
2172 


234688 
1497@ 
2498 
2222 
15400 
1562 
$020 
14866e 
$o03e 
530 
23098 
23078 
15160 


1562 
7440 

1562 

2172 


1498 
2509¢ 
2311 
1562 
2172 
730¢ 
15030 
1468 
1503 


2172 
7258 
13688 
24238 
2365 
1489 
698 


MAINDEC $41 -DETAC oC 
CROSS REFERENCE TABLE © USER SYMBOLS 


1568 
2296 
788¢ 
15086 
15046 
1546 


7400 
13868 


23686 
1499 
715 


1747 


2591 


684e 


7640 
14038 


23998 
15078 
1426 


1779 


817e 
1352 


7986 


2425¢ 
1427 


2172 
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8836 
18106 


1445 


2240 





> eee er 


a 
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11780 


6278 


12790 


6760 


2597 


13236 


1177e 
16960 


o8ie 


12780 
19240 


13740 


13530 
1982 


11730 





Py 2) ors 
15050 
13730 
19728 
12730 
Jo 





oO 
2 TAI MANUAL INTERVENTION TEST MAINDEC"11eDZTACeC MACY11 27(732) i1eJUN@76 13351 PAGE 64 SEG 6676 — 
& DETACC .WEW CROSS REFERENCE TABLE ©-< USER SYMBOLS ; 
SSAVRES seeeee U 2468 
a GSAVR6 612540 24830 2491 24928 24930 25118 
SSCOPE 606046 498 14626 
SSETUPs 000137 4698 489 4998 492 ass 496 aoe 499 506 $02 $24 $27 1424 
e 1463 1526 1549 1557 2177 2311 
esTuPp = 177777 4696 
SSVLAD 606254 1473 18028 
Oo sswR s 1674060 1e ii 62 63 64 65 66 67 668 377 378 379 499 
500 $02 $03 697 714 729 744 766 602 617 033 662 96s 
1065 1177 1277 1322 1352 1372 1390 1407 1417 1425 1437 1443 1445 
SG 1484 1455 1456 1457 1488 1464 1476 1478 1479 1462 1463 1404 1491 
1492 1493 1504 1507 1549 1917 1518 1919 1520 1521 (1934 1943 1546 
1580 1862 1787 25008 
@ SSWRMKs 600000 68 69 1488 1459 1480 
STIMES 601166 3778 4998 6978 714¢e 7298 6310 O82e8 1277 41322¢ 1352¢ 1372¢ 1390¢ 1407¢ 
142S@ 14918 1498 15018 1810 1787@ 
Fa) sTKB 001146 366¢ 2175 2186 2203 2257 2263 
sTKS 001144 3650 2175 2184 2200 2224¢ 22558 2261 
STN s 000023 Lo ii 693 o97e@ 699 716 71460 716 725 7296 734 7386 740 
ps) 7448 782 764 7680 796 798 a0286 606 . O11 613 61780 621 025 
627 e316 678 6020 884 B98 984 9856 $86 1061 106se 1086 1173 
11778 1178 1273 12778 1279 1318 1322¢ 1323 1348 13520 1354 1366 1366 
oe 13728 1374 1364 1386 13908 1401 1403 14076 
eTPB 601152 368¢ 21616 2172 
STPFLG 001157 3728 2119 2172 
@ sTPs 061150 367¢ 2159 2172 
STRAP 012304 494 24348 
STRAP2 612326 24458 2456 
9 STRP s 900014 eoaee 24568 24598 24608 24616 2462 24630 2464 24656 24660 24678 24668 24690 
4768 
STRPAD 612340 2439 245680 , 
2 STSTNM 001102 3450 655e 1424¢ 1453 1480 1502¢ 1507 1511 1533 1562 
STTYIN 611710 2282 2283 2300 23048 
STYPBNs eeeses U 2461 
9 STYPDSs seeeee U 2461 
STYPE 610760 21198 2449 24587 
STYPEC 911130 2140 2147 2154 21598 2166 2226 
o STYPEX 0611176 2165 2167 21708 
sTYPOC 612102 23798 2458 
STYPON 612116 2378 23619 2460 
& STYPOS 612056 23748 2459 
SXTSTR 606060 14678 
S6GET4s 800000 14378 
@ SOFILL 6123061 237Se 2379¢ 2389 24248 
S40CATS Geeeee U 1464 1543 
° s 013474 2238 2278 2898 2998 3218 3428 383 467 $02 $03 $300 6658 1445 
 ) 1448 1510 1511 1562 15978 1777¢ 178S¢e 2172 2175 23048 2385 2311 2486 
2510 25898 
Q 
@ ERRORS DETECTED: 
DEFAULT GLOBALS GENERATED: @ 
ne ®TACC, TACC/SOL/CRF st SYMsDZTACC NEW 
C6 K& 
iin bac tc ih len Ss iii nse titra Ante ttc a TC NN AE AEE: 


TAI1 MANUAL INTERVENTION TEST 
CROSS REFERENCE 


RUN@TINES 44 29 2 SECONDS 
RUN©TIME RATIOs 171/7782.2 
CORE USED: 25K (49 PAGES) 


MAINDEC #3 1DZTAC oC 
TABLE -- USER 8 


tn 


’ > Laat & ' 3 +e wv, ee 
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SEQ 6077 


Lio 





